Ввод данных в стандартное диалоговое окно iputbox

 

Используется для ввода небольших фрагментов текста. Окно InputBox состоит из четырех элементов:

· строка заголовка;

· приглашение к вводу;

· поле ввода со значением, предлагаемым по умолчанию;

· две кнопки (OK и Cancel).

Функция InputBox выводит на экран диалоговое окно, содержащее сообщение и поле ввода, устанавливает режим ожидания ввода текста пользователем или нажатие кнопки, а затем возвращает значение типа String, содержащее текст, введенный в поле ввода.

InputBox(приглашение[, заголовок][, умолчание][, Xпоз][Yпоз]
[,файл справки, контекст])

Где:

приглашение – строковое выражение, отображаемое как сообщение в диалоговом окне. Должно служить подсказкой пользователю, какую информацию он должен ввести в специальное поле ввода, находящееся в этом окне.

заголовок – строковое выражение, отображаемое в заголовке диалогового окна. Если параметр опущен, в строку заголовка помещается имя приложения.

умолчание – строковое выражение, отображаемое в поле ввода и используемое по умолчанию, если пользователь не введет другой строки. Если этот параметр опущен, поле ввода изображается пустым.

Xпоз – числовое выражение, задающее расстояние по горизонтали между левой границей диалогового окна и левым краем экрана (в твипах). Если параметр опущен, то диалоговое окно выравнивается по центру экрана по горизонтали.

Yпоз – числовое выражение, задающее расстояние по вертикали между верхней границей диалогового окна и краем экрана (в твипах). Если опущен, то диалоговое окно помещается по вертикали примерно на 1/3 высоты экрана.

Примечание: Твип (twip) – единица измерения расстояния для VISAUL BASIC, устанавливаемая по умолчанию (1 дюйм = 1440 твип).

Возвращаемым значением данной функции является информация, вводимая пользователем. VISAUL BASIC автоматически приписывает этой информации тип String.

Примечание: Если нажимается кнопка «ОК» или клавиша «Enter», функция возвращает пустую строку(“”).

Функцию InputBox с двумя и большим числом аргументов можно использовать только в выражении. Наличие запятых, соответствующих отсутствующим аргументам, является обязательным.

На рис. 52 – 54 приведен пример решения задачи, демонстрирующий использование стандартных диалоговых окон для ввода фамилии, имени и отчества.

Обработка символьных данных

 

Конкатенация строк

В VISAUL BASIC существует 2 знака конкатенации:

1) +

2) &

С помощью & можно подвергнуть конкатенации не только строки, но и числа. При этом числа будут сначала преобразованы в строки. Результат будет тоже строкой.

 

Наиболее распространенные встроенные функции

1) Функция определения длины строки:

Len(Строка$)

Возвращает длину строки Строка$

Например: Len("Иван" + "Петрович") возвращает 12

2) Функции выделения подстроки:

2.1) Mid(Строка$, Позиция& [, Длина&])

Например: Mid("Иван Петрович", 6) возвращает "Петрович";

Mid("Иван Петрович", 6, 3) возвращает "Пет"

2.2) Left(Строка$, Длина&)

Например: Left("Иван Петрович", 4) возвращает "Иван"

2.3) Right(Строка$, Длина&)

Например: Right("Иван Петрович", 8) возвращает "Петрович"

3) Функции удаления пробелов из строки:

3.1) Ltrim(Строка$) удаляет из строки начальные пробелы;

3.2) Rtrim(Строка$) удаляет из строки конечные пробелы;

3.3) Trim(Строка$) удаляет из строки начальные конечные пробелы.

4) Функция поиска подстроки:

InStr([Начало&,] Строка$, Подстрока$)

Например: Instr("Иван Петрович", "Иван") возвращает 1;

Instr(2,"Иван Петрович", "Иван") возвращает 0.

5)Функции преобразования:

5.1) Val (Строка$) преобразует строку Строка$ в число.

Данная функция часто используется для преобразования строк, вводимых пользователем через окна ввода или текстовые поля экранной формы, в числа, которые затем используются в вычислениях.

Например: Если Text1.Text содержит значение “3580”, то результатом вычисления NomGr = val(Text1.Text)+1 будет число 3581.

 

 

При преобразовании строки в число учитываются все цифровые символы слева направо. Первые и последние пробелы игнорируются. Пробелы внутри не допускаются. Если первый символ в строке не является цифрой, то Val возвращает 0.

5.2) Str(Число) преобразует число любого типа в строку.

Данная функция часто применяется для преобразования чисел, которые получаются в результате вычислений в программе, в строки, помещаемые в текстовые поля экранной формы или окна сообщений.

При преобразовании положительных чисел пред первой цифрой помещается пробел, при преобразовании отрицательных чисел перед первой цифрой помещается символ “-”.

Например: str(NomGr) возвращает строку «3581»,

Ltrim(str(NomGr)) возвращает строку «3581» без начального пробела.

5.3 ) Asc(Строка$) преобразовывает строку в код ASCII первого символа этой строки.

Например: Asc("1999") возвращает 49 (код ASCII цифры 1)

5.4) Chr(Код&) преобразовывает код ASCII в строку из одного символа.

Например: Chr(49) возвращает "1".

Примечание. Чтобы разбить строку в окне сообщения на части, ее нужно представить в виде конкатенации строк:
Строка1$&Chr(13)&Chr(10)&Строка2$ (13 и 10 -это коды неотображаемых символов перехода на новую строку (перенос) и возврата на левую сторону страницы (возврат каретки))

6) Функции смены регистра:

6.1) UCase(Строка$) возвращает исходную строку, все буквы которой преобразованы в прописные.

Например: UСase(Visual Basic) возвращает "VISUAL BASIC"

6.2) LCase(Строка$) возвращает исходную строку, все буквы которой преобразованы в строчные.

Например: LСase ("Список Стран") возвращает "список стран"