Основы Visual Basic школьникам

Сетевые уроки преподавателя МОУ "Куракинская СОШ" Шакурова З. З. 

Мой сайт

Оглавление

Программы по физике

Задания по физике и математике

Ссылки

Тема16=======Способы программного ввода информации=======

Для ввода информации в Visual Basic, могут применить:

1. ввод информации из текстового поля с использованием функции Val - функции преобразования строковых величин в числовые;

2. ввод информации из Диалогового Окна Ввода с использованием функции InputBox;

3. ввод информации из списка ListBox или ComboBox;

4. ввод информации из файла.

---Функция Val---

Если символьные величины a = "10" и b = "28",то Val(a) + Val(b)уже не равно символьной величине "1028", а равно числу 10+28=38

Функция Val часто применяется при вводе чисел из ТЕКСТОВОГО ПОЛЯ TextBox, ведь, число введенное в ТЕКСТОВОЕ ПОЛЕ, это не число, а набор символов. При помощи функции Val этот символ, введенный в ТЕКСТОВОЕ ПОЛЕ, нужно превратить в число, и затем это число можно использовать в арифметических действиях.

ПРИМЕР: Нужно составить программу, которая вычисляет потенциальную энергию тела, поднятого над Землей, по формуле E = m*g*h. Где g = 9,8 а масса и высота может быть любым, значения которых нужно вводить в текстовые поля Text1 и Text2. Ответ должен выдаваться при нажатии на кнопку ОТВЕТ, с именем ANSWER.

ПРОЕКТ:

В ФОРМЕ нужно поместить, хотя бы три текстовых поля Text1, Text2, Text3. Первые две для ввода массы m и высоты h, а третья для вывода значения Е.

1. В первые две текстовые поля нужно вводить данные, значить у них свойство Locked=False, а в третье поле запретить вносить изменения - Locked=True.

2. В ФОРМЕ нужно поместить командную кнопку CommandButton дать имя (например, ANSWER) и связать с ним событий процедуру возникающую при левом щелчке по кнопке, для решения задачи, с данными введенными в Text1и Text2, и вывода результата в Text3.

3. Для создания событийной процедуры кнопки ANSWER, нужно сделать по нему двойной левый щелчок и в открывшемся окне КОД, заполнить процедурную заготовку, до следующего вида.

Private Sub ANSWER_Click()

  Text3.Text = Val(Text1.Text) * 9.8 * Val(Text2.Text)

End Sub

Когда вы в текстовое поле1 вводите, например 25, вы думаете ввели число 25, а машина запоминает два символа "2" и "5" (потому, что данные ввели в текстовое поле, само название говорит - символы).

Написав в формуле Val(Text1.Text) (это говорит компьютеру - символы введенные в Text1 переведи в число) вы получаете в формуле число 25, а не символы "2" и "5". Аналогично остальное.

---Функция InputBox---

Функция ввода InputBox (ОкноВвода) - позволяет вводить данные с помощью диалоговой панели ввода.

Аргументами функции являются три строки, значением - также строка.

При выполнении функции на экране появляется ДИАЛОГОВОЕ ОКНО с ТЕКСТОВЫМ ПОЛЕМ.

InputBox ("Приглашение", "Заголовок (будет печататься в заголовке окна)", [По умолчанию - это содержание текстового поля. Если здесь ничего не написано, то ТЕКСТОВОЕ ПОЛЕ пустое])

ПРИМЕЧАНИЕ: Функцию ввода InputBox (ОКНО ВВОДА) хорошо применять совместно с функцией вывода информации MsgBox . Об этой функции смотри выше.

• strA = InputBox("Введите ваше Имя и Фамилию:", "Регитрация") - выводит на экран окно "Регистрация", с запросом "имени и фамилии", и с пустым ТЕКСТОВЫМ ПОЛЕМ для его ввода. Введенное "Имя и Фамилию" присваивает символьной переменной strA.

• MsgBox("Уважаемый " + strA + ", Вы готовы к проверке знаия?", 36, "Конец регистрации")

Значение символьной переменной strA использует в появляющемся ОКНЕ ВЫВОДА MsgBox. (Окно имеет две кнопки нет и да, так как, стоит цифра 36 (см табл)).

---Ввод информации из списка---

Ниже приведен пример простенькой программы, поясняющий способ ввода информации из списка ListBox или ComboBox.

Private Sub Kommand1_Click()

  Text3.Text = List1.Index(0) + List2.Index(7)

End Sub

 
---Ввод информации из файла---

Например если вы хотите, чтобы в процессе выполнения программы в Image1 появилось изображение из файла, то можно использовать его свойство LoadPicture и в программе набрать следующее: Image1.Picture = LoadPicture("полный путь к файлу, и даже расширение").

Функций и операторов для работы с файлами много, но в нашем случае нужно запомнить оператор Open (Открыть): Open ПОЛНОЕ ИМЯ ФАЙЛА
 

 ВВЕРХ

========================

Мой сайт

Программы по физике

Оглавление

Ссылки