Для детей, которые хотят научиться программированию

ПРАКТИЧЕСКИЕ РАБОТЫ
Visual Basic 6.0 – Часть Первая Попов Сергей Михайлович
Практическая работа 1
Откройте Visual basic 6.0. Первое ваше приложение будет с функцией выхода. Вы, наверное, зададите вопрос «А не проще просто нажать сверху крестик». Я с вами полностью согласен, но это для того, чтобы начать с самого простого. И так, вы открыли VB 6.0. Теперь создайте кнопку с названием Command1, такое название компьютер даст кнопке автоматически. Для того чтобы изменять имя кнопке или любому другому объекту вы должны найти окно
Properties (смотрите рис. 1)
Рис. 1
Там вы должны найти строку (Name) сейчас на этой строке стоит стандартное имя. На строке Caption напишите В&ыход (Чтобы воспользоваться таким знаком, переведите вашу клавиатуру на Английский режим, зажмите кнопку Shift, а затем кнопку с цифрой 7). Теперь, когда у вас подчёркнута буква «Ы», то при нажатии комбинации Alt + Ы у вас автоматически будет нажиматься эта кнопка.
Для того чтобы ваша кнопка имела нужное значение нажмите на неё два раза, у вас появиться окно Code. Между строкой
Private Sub Command1_Click()
И
End Sub
Напишите следующую команду: End
Теперь нажмите кнопку в верхней части экрана и посмотрите, что у вас получилось. Если же компьютер пишет вам ошибку, то ещё раз внимательно прочитайте код и свойство (Name), проверьте, всё ли правильно вы сделали. На этом практическая работа 1 закончена
Практическая работа 2 – Перемещение между окон Form
Откройте VB 6.0. Создайте ещё одно окно Form следующим путём: (Рис. 5) и (Рис. 6)

Рис. 6
Затем найдите вот такое окно: (Рис. 7)
Рис. 7
Нажмите на надпись «Form1 (Form1)» и создайте в окне Form1 объект Command. Поместите в любую часть окна Form1 и откройте меню Code. У вас там должен быть вот такой код:
Private Sub Command1_Click ()
Form2.Show
End Sub
Проверьте ваше приложение
Для того чтобы переключится на другое окно Form нажмите кнопку «Command1»

Практическая работа 3 – Функция Multiline
Откройте VB 6.0. Поместите в окно Form TextBox1 и найдите в окне Properties функцию Multiline и измените его значение на True. Затем найдите функцию Scrollbars и измените его значение на любое, кроме «1 – None». Теперь, когда вы напишите больше, чем умещается, то вы сможете просто переместить ползунок и увидеть, что написано дальше
Практическая работа 4 – Check Box
Откройте VB 6.0. В Окне Form создайте объект CheckBox и TextBox. Откройте окно кода объекта Check1 и введите там следующий код:
Private Sub Check1_Click()
If (Check1.Value = Checked) Then
Text1.Text = "1"
End If
End Sub
Проверьте ваше приложение
Вы сделали приложение, которое при нажатии кнопки проверки изменяет или добавляет текст в текстовом окне. Попробуйте сделать своё собственное приложение такого рода
Практическая работа 5 – MsgBox
Откройте VB 6.0. Создайте в окне Form объект Command1 и сделайте ему надпись Со&общение. Откройте меню Code и запишите на вот такой код:
Private Sub Command1_Click()
Dim intPress As String

intPress = MsgBox("Привет!", 48 + 3, "Приветствие")
End Sub
Это сообщение должно выглядеть так: (Рис. 3)

Рис. 1

Проверьте ваше приложение
Практическая работа 6 – MsgBox
Откройте VB 6.0. В окне Form создайте объект Command1 сделайте ему надпись Ошиб&кА и откройте меню кода. Напишите там следующий код:
Dim intPress As String

intPress = MsgBox("Ошибочка вышла!”,16 + 2,”Ошибка!”)
Проверьте ваше приложение
Я надеюсь теперь, вы поняли, что первые кавычки – это сообщение, а вторые кавычки – это заголовок сообщения. Остальные правила вы можете прочитать во втором учебнике «Теория»
Практическая работа 7 – Печать
Откройте VB 6.0. Создайте три объекта TextBox ,один объект Command и один объект Label. Расположите их в таком порядке: (Рис. 4)
рис. 4
Измените функцию Caption объекта Label1 на «Просто так». Затем измените функцию Caption объекта Command1 на «Печать». Откройте меню Code объекта Command1. У вас должен быть вот такой код:
Private Sub Command1_Click()
Printer.Print Lable1, textBox1, TextBox2
End Sub
Проверьте приложение и нажмите кнопку Command1 (С надписью «Печать» (Если вы, конечно, переименовали кнопку Command1))

Заключение
Я вас смог научить почти всему тому, что знал, и тому, что вам пригодится в будущем вашего программирования, я намерен выпустить книгу о Visual Studio 2008. Это среда программирования, которая превосходит Visual Basic 2008 почти во всем. Во-первых, там есть четыре языка программирования. Во-вторых, вы экономите время на ввод код. Иногда компьютер может вам подсказать, что можно вставить в код, сообщает вам об ошибках. В-третьих, расширенный и простой интерфейс. Ну, сами посудите, Visual Basic 6.0 был разработан в 1997 году, кстати, я тогда родился, а Visual Studio 2008 в 2008 году. Конечно, есть люди, которые ещё не доверяют этой среде программирования, а предпочитают Традиционную среду программирования. Представьте себе, какая была первая версия Visual Basic, если эта версия шестая!!!