- •Федеральное агентство по рыболовству Балтийская государственная академия рыбопромыслового флота
- •Оглавление
- •Введение
- •Программирование на языке Visual Basic
- •Создание Windows-приложения
- •Переменные и константы
- •Объявление типа переменной
- •Комментарии в программных кодах
- •Выражения
- •Оператор присваивания
- •Функции
- •Математические функции
- •Финансовые функции
- •Системные функции InputВox и MsgBox
- •Вывод только значения переменной z
- •Строковые выражения и функции
- •Использование текстовых полей для ввода и вывода
- •Вывод на экранную форму с помощью оператора Print
- •Оператор If…Then для программирования ветвлений
- •Оператор Select Case
- •Программирование циклов с использованием операторов For…Next и Do…Loop
- •2. Оператор цикла do ... Loop (цикл с условием)
- •Оператор Exit
- •Циклы с незаданным числом повторений
- •Массивы
- •Работа с одномерным массивом
- •‘ Переобъявление динамического массива
- •Двухмерные массивы
- •Сортировка элементов массива
- •Работа с файлами последовательного доступа
- •Контрольные вопросы
- •Список литературы
Вывод только значения переменной z
MsgBox "z =" & z
Вывод значения переменной z с поясняющим
текстом
MsgBox "z =" & z, , "Результаты вычислений"
Вывод с текстом в заголовке окна
MsgBox "z =" & z & " у =" & y, , "Результаты вычислений"
Вывод двух переменных z и у
MsgBox "z =" & z, 64, "Результаты вычислений"
Вывод переменной z и знака информация
MsgBox "z =" & z, 65, "Результаты вычислений"
Вывод z, знака и кнопок Ok и Отмена
MsgBox "Повторите ввод данных!", vbCritical, "Ошибка"
Вывод текста сообщения и знака
ошибки
MsgBox "Повторите ввод!", vbInformation + vbYesNo, "Ошибка"
Вывод текста, знака предупреждения, кнопок Да, Нет
End Sub
Строковые выражения и функции
Строка – упорядоченная последовательность символов.
Строковое выражение – это строка (или несколько строк), между которыми стоит знак конкатенации (слияния, объединения) & (или +).
Строковые функции:
а) Функция определения длины строки имеет вид:
LEN(A),
где А – строковая переменная или константа.
Задание. Выполнить следующий фрагмент программы.
Private Sub Command1_Click()
Defstr А – В
А = InputBox("Твоя фамилия")
В = InputBox("Твое имя")
С = LEN(A)
D = LEN(B)
MsgBox "Длина фамилии" & С & " символов"
MsgBox "Длина имени" & D & " символов"
End Sub
b) Функция выделения подстроки. Рассмотрим три функции выделения подстроки.
Функции имеют вид:
MID(A,K,[,M])
Left(A,K1)
Right(A,K1)
где А - строка, в которой происходит выделение группы символов;
К - номер позиции, с которой происходит выделение;
М - сколько символов выделяется (если число символов не указано, то выделение происходит с указанной позиции до конца строки);
K1 - число выделяемых символов (слева или справа).
Пример фрагмента программы:
‘ Объявление переменных как строковых
Dim А As String, В As String, С As String, D As String
А="Информатика"
В=MID(А,3,5) ‘ выделение с 3-й позиции 5-ти символов
C=Left(A,4) ‘ выделение 4-х символов слева
D=Right(A,2) + "ток"
Print В ‘ выведется слово «форма»
Print С ‘ выведется слово «Инфо»
Print D ‘ выведется слово «каток»
с) Функции преобразования подстроки.
Преобразовывают данные из одного типа в другой.
Функция Val(A) - преобразовывает строку символов в число (где А - строка).
Например, функция Val ("5") даст в результате число 5.
Функция Str (число) - преобразовывает число любого типа в строку.
Например, функция Str(5) даст в результате символ "5".
Эти функции используются при работе с текстовыми полями, когда осуществляется, ввод и вывод данных с их помощью. Функция Val преобразовывает строки, вводимые пользователем через текстовые поля экранной формы в числа, используемые затем для вычисления. Функция Str преобразовывает числа, получаемые в результате вычисления в строки, помещаемые в текстовые поля.
Строковые функции Val и Str используются при работе с диалоговыми окнами ввода InputBox и окнами сообщений MsgBox.
Например, а = Val(InputBox("Ввод а")).