Форматирование вывода

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

Вот упрощенный синтаксис функции Format: Format(Выражение, Формат). Параметр Выражение определяет значение, которое требуется преобразовать. Параметр Формат – это текстовая строка, сформированная из символов: (0) – в этой позиции должен быть напечатан замыкающий или лидирующий ноль; (#) – в этой позиции не следует печатать замыкающий или лидирующий ноль; (.), (,), (-), (+), ($), ((), ()), (пробел) – эти символы печатаются в той позиции, где они указаны.

Ниже приводятся примеры преобразования чисел функцией Format:

Обращение к функции Результат

Format(315.4,”00000.00”) 00315.40

Format (315.4,”#####.##”) 315.4

Format (6315.4,”##,##0.00”) 6,315.40

Format (315.4,”$##0.00”) $315.40

Format (“09.10.2001”,”dd.mm.yy”) 09.10.01

Format(“09.10.2001”,”dddd,ddmmmm,yyyyгода”) вторник, 09 октября, 2001 года

Лекция 6 Вывод данных с помощью функции MsgBox

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

MsgBox (Сообщение)[, , Заголовок]

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

Пример 1

i= 5

MsgBox("i= " &i), , "Вывод переменной i"

Окно функции MsgBox будет выглядеть так, как показано на рис. 6.1.

Управление порядком выполнения инструкций

Инструкции управления порядком выполнения команд позволяют оценить реальную ситуацию и адекватно реагировать на нее, принимая решения о дальнейших действиях. VB предоставляет для этого ряд инструкций.

Условная инструкция If ... End If

Наиболее часто для программирования разветвлений используется инструкция If ... End If (блок-схема реализуемого алгоритма на рис. 6.2), которая может иметь простую однострочную или блочную структуру.

Однострочный синтаксис

If ЛВ Then Инструкция1 [Else Инструкция2]

Здесь If (если), Then (то) и Else(иначе) - зарезервированные слова, ЛВ – логическое выражение. Существенно, что здесь после слова Then, а также после словаElseможет находиться только одна инструкция. Выполнение такой инструкции состоит в следующем. Если ЛВ, имеет значение True, выполняется Инструкция1, указанная за Then, а инструкция 2 не выполняется (пропускается). Если же значение ЛВ равно False, то выполняется Инструкция2, следующая за ключевым словом Else, если такая имеется, а Инструкция1 пропускается.

Пример 2

If A = 7 Then Beep

В этом примере выдается звуковой сигнал, если переменная А равна 7.

Пример 3

If X < 9 Then Print "False!" Else Print "True!"

В примере 3 выводится текст False!, если значение переменной X меньше 9. В противном случае выводится текст True!.

Блочный синтаксис

If ЛВ1 Then

[Инструкции1]

[ElseIf ЛВi Then

[Инструкцииi]]

[Else

[Инструкции2]]

End If

Если в зависимости от условия необходимо выполнить не одну инструкцию, а несколько инструкций, следует использовать блочный синтаксис. Это относится и к ветви Else. Кроме того, блочная структура с ElseIf позволяет анализировать несколько условий. Здесь каждая из Инструкции1, Инструкции2 и ИнструкцииI– это одна или несколько инструкций.

Выполнение этой инструкции Ifсостоит в следующем. Сначала проверяется значение ЛВ1. Если оно истинно, то выполняется группа Инструкции1 и на этом выполнение инструкцииIfзавершается. Если же значение ЛВ1 ложно, то проверяется значение следующего условия ЛВi. Если оно истинно, то выполняется группа ИнструкцииIи на этом выполнение инструкцииIfзавершается. Если же значение ЛВiложно, то проверяется следующее ЛВi. Если же все ЛВiоказываются ложными, то выполняется группа инструкций Инструкции2.

Пример 4

If A = 7 Then

Beep

End If

В этом примере звуковой сигнал прозвучит только в том случае, если значение переменной А равно 7.

Пример 5

If Name = "Иванов" Then

Print "Ваша карточка удерживается!"

Else

Print"Получите деньги, пожалуйста!"

End If

В этом примере, если значение переменной Nameравно “Иванов”, то будет выведено Ваша карточка удерживается!. При любом другом значении переменнойNameбудет выведено Получите деньги, пожалуйста!

Пример 6

If Обращение = 1 Then

Print "Здравствуйте, господин"

ElseIf Обращение = 2 Then

Print " Здраствуйте, госпожа"

Elself Обращение = 3 Then

Print " Здравствуйте, дамы и господа"

Else

Print "Здравствуйте, люди"

End If

Для этого примера результат вывода показан в таблице:

Значение переменной Обращение	Результат вывода
1	Здравствуйте, господин
2	Здравствуйте, госпожа
3	Здравствуйте, дамы и господа
Любое другое, кроме 1, 2, 3	Здравствуйте, люди