13.2. Операторы присваивания и способы ввода данных Оператор присваивания

Синтаксис оператора: имя переменной = выражение;

- выражение может быть арифметическим, логическим или строковым. Функционирование оператора - вычисляет выражение и присваивает его значение имени переменной. Переменная в левой части и выражение в правой части должны быть одного типа. Исключением является переменная типа Variant, которая принимает тип переменной, стоящей справа.

Примеры: s:= (a+b)*h/2 ; с:= d > 7.5

Способы ввода данных

1. Ввод данных с помощью оператора присваивания:

V=2.5 - таким образом, в ячейку V будет введено число 2.5

2. Ввод данных с помощью функция InputBox(), которая записывается в операторе присваивания. Синтаксис сокращенного представления функции :

v

Рис. 13.1. Диалоговое окно

Для ввода

= InputBox (приглашение )

Переменной V присваивается результат работы функции InputBox;

приглашение – обязательная текстовая переменная или константа.

Запишем фрагмент программы ввода:

Dim V As String

V= InputBox (“Введите слово”)

При работе функции выводится диалоговое окно с приглашением на ввод информации в текстовом поле (рис. 13.1). После ввода данных функция возвращает их как строчные данные. Если мы ввели строку Начало работы в 8.00, то переменной V будет присвоена эта строка.

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

Запишем фрагмент программы ввода:

Dim a As single

a= Val(inputBox( " Введите значение а "))

Синтаксис полного представления функции inputBox(), включает н

Рис. 13.2. Ввод числа 13.65

еобязательные параметры: [Заголовок окна ]

[ввод по умолчанию ] , [гориз. расположение окна ] , [верт. расположение окна ] , [помощь ] , [ контекст ].

3. Фрагмент программы ввода данных с помощью окна TextBox на форме (

Рис. 13.3. Ввод в окно TextBox

рис. 13.3):

Dim a As single

a= Val(TextBox1.Text)

13.3. Способы вывода данных

1. В

   

   Рис. 13.4. Окно отладки Immediate

   ывод переменной а в текстовое окно TextBox1 формы UserForm:

TextBox1.text= a

2. Вывод переменной а в окно отладки Immediate (рис. 13.4).

Debug.Print "a="; a

Синтаксис оператора:

D

Рис. 13.5. Окно MsgBox

ebug.Print [ список вывода с разделителями ]Debug – отладчик; Print – метод вывода в отладочное окно; разделители - , ; &

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

3. Вывод в отдельное окно c помощью оператора MsgBox (рис. 13.5):

MsgBox "a=" & a

Синтаксис сокращенного представления оператора:

MsgBox сообщение [, константа ] [, заголовок окна ]

Сообщение — текстовая константа и/или переменная;

Некоторые значения константы: 0 - вывод кнопки ОК; 1 - вывод кнопок ОК

и Отмена; 16 -значок об ошибке.

Н

Рис.13.6. Окно MsgBox

апример, (рис. 13.6):

а= 13.65

MsgBox " Значение а= " & a, 1 , "Вычисление длины "

П

Рис. 13.7.

ример 13.1.Линейная программа . Даны переменные а, с . Вычислить у=а+в. Вывести у с точностью до 2-х знаков после запятой с применением функции Format (рис. 13.7):

Private Sub CommandButton1_Click()

Dim a, b, y As Single

a = 223.2345: b = 3.45678

y = a + b

MsgBox "y=" & Format(y, "###.##")

End Sub