|
Вывод информации
используя метод Print.
-
Form1.Print sngX;"=";2
- выводит в форму1 друг за другом Х=2 (обрати
внимание на ;)
-
Form2.Print К,А,В -
выводит в форму2, по зонам в 14 символов каждая,
значения переменных К А В (обрати внимание на ,)
-
Form1.Print "Привет"
- выводит в ФОРМУ1 слово Привет
Вывод информации в
ТЕКСТОВОЕ ПОЛЕ TextBox.
В текстовое поле вывести
информацию можно используя свойство Text текстового
поля.
Text2.Text =Х - выводит
в текстовое1 поле значение переменной Х.
Private Sub
Command1_Click()
X = 2
Y = 3
Text1.Text = X + Y
End Sub
После щелчка по кнопке Command1
в Text1 выводится число 5. Если нужно слово, то это
слово берут в кавычки.
Вывод информации в
МЕТКУ Label.
В МЕТКУ вывести информацию
можно используя свойство Caption МЕТКИ.
Label1.Caption =Х -
выводит в МЕТКУ1 значение переменной Х.
Private Sub
Command1_Click()
X = 2
Y = 3
Label1.Caption = X + Y
End Sub
После щелчка по кнопке Command1 в Label1 выводится число
5. Если нужно слово, то это слово берут в кавычки.
С символьными величинами можно произвести операцию
сложения. Если символьные переменные а="инфор" и с="матика",
то а+с="информатика", тогда Text1.Text =a + с будет
выводить слово ИНФОРМАТИКА.
Вывод информации с
использованием Функций: Str, Val, MsgBox (Панель
Сообщений).
---Функция
Str----
При выводе информации можно
использовать функцию Str - функцию преобразования
числового значения в символьное.
Если числовые величины а=23 и b=54, то Text1.Text =Str(a)+Str(b)
выводит не число 63, а символ "2354" (просто набор
символов, то есть символьная величина).
---Функция Val---
При выводе информации можно
использовать функцию Val - Функция Val преобразует
символьную информацию в числовую.
Если символьные величины a = "10" и b = "28",то
Text1.Text =Val(a) + Val(b)уже выводит не символьную
величину "1028", а число 10+28=38.
Функция Val часто применяется при вводе чисел из
ТЕКСТОВОГО ПОЛЯ TextBox, ведь, число введенное в
ТЕКСТОВОЕ ПОЛЕ, это не число, а набор символов. При
помощи функции Val этот символ введенный в ТЕКСТОВОЕ
ПОЛЕ нужно превратить в число, и затем это число можно
использовать в арифметических действиях.
---Функция
MsgBox (Панель Сообщений)---
При выводе информации можно
использовать функцию MsgBox (Панель Сообщений) - см
Угринович стр 195
MsgBox "Сообщение" [ , ЧислоКод1 + ЧислоКод2 они
определяют вид и комбинацию панели сообщения] [,
Заголовок Панели Сообщений] То, что в квадратных
скобках, можно и опустить.
Если ЧислоКод = 36 панель имеет
две кнопки Да - 6 и Нет - 7, которое присваивается,
например, переменной bytA.
Если в программе написать If
bytA = 7 Then End, то по щелчку в кнопках Да Нет можно
либо продолжить программу, либо выйти.
ПРИМЕЧАНИЕ: Функцию
MsgBox хорошо применять совместно с функцией ввода
информации InputBox (ОКНО ВВОДА). Об этой функции смотри
ниже.
Значения ЧисКод1 и ЧисКод2,
определяющие вид Панели Сообщений и значения функции
MsgBox.
|
ЧислоКод1 |
Пиктограмма |
ЧислоКод2 |
Набор
кнопок |
Нажатая
кнопка |
Значение
функции. |
|
16 |
 |
0 |
ОК |
ОК |
1 |
|
32 |
 |
1 |
ОК,
ОТМЕНА |
ОТМЕНА |
2 |
|
48 |
 |
2 |
СТОП,
ПОВТОР, ПРОПУСТИТЬ |
СТОП |
3 |
|
64 |
 |
3 |
ДА, НЕТ,
ОТМЕНА |
ПОВТОР |
4 |
|
|
4 |
ДА, НЕТ |
ПРОПУСТИТЬ |
5 |
|
5 |
ПОВТОР,
ОТМЕНА |
ДА |
6 |
|
|
НЕТ |
Вывод
информации с использованием Функции Date.
Функция Date - выводит значение текущей даты.
#Месяц/Число/Год#
Вывод информации с
использованием Функции Time.
Функция Time - выводит значение текущего времени.
-
Поместить в форме объект Time и поставить его
свойство Interval - значение 1000.
-
Поместить на форму текстовое поле
-
Ввести событийную процедуру для него и в
качестве оператора записать Text1.Text=Time
---Важное примечание---
Очень часто информацию записывают прямо в файл и
сохраняют в виде файла. Об этом, возможно, я расскажу
потом.
ВВЕРХ |