Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Пособие Серкова1(06.09.11).doc
Скачиваний:
1
Добавлен:
01.05.2025
Размер:
4.37 Mб
Скачать

5 Основные инструкции языка Visual Basic

Сгруппируем основные инструкции языка Visual Basic по типу операций:

  • присваивания, в том числе с выполнением математических операций в правой части инструкции;

  • проверки условий, управления последовательностью исполнения инструкций, организации циклов;

  • инструкции для работы с файлами.

Последняя группа инструкций в этом кратком пособии не рассматривается. При необходимости с ними можно познакомиться самостоятельно [2, 4].

Инструкция присваивания предписывает найти значение выражения, заданного в ее правой части, и присвоить результат переменной, идентификатор которой расположен в левой части. Например, присвоить переменной x значение 2. Это можно записать: x=2. В следующем примере значение переменной x увеличивается на 2: x = x + 2.

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

Арифметические операции выполняются над числами, и их результатом являются числа. Они перечислены в таблице 3. При программировании формул необходимо учитывать приоритеты операций и (в случае необходимости) использовать скобки, как это принято в математике.

Таблица 3

Арифметические операции

Операция

Содержание операции

Приоритет

^

Возводит первое арифметическое выражение в степень,

задаваемую вторым арифметическим выражением

1

-

Знак минус ставится перед именем переменной, константы

или перед числом

2

*

Перемножает два арифметических выражения

3

/

Делит первое арифметическое выражение на второе

3

\

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

4

Mod

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

5

+

Складывает два арифметических выражения

6

-

Вычитает из первого арифметического выражения второе

6

Поясним таблицу 3. Смена знака имеет место, когда минус ставится перед именем переменной, константы или перед числом. Например: F=CX*(-G^2), если CX=3, а G=1.5, то F = -6.75. Чтобы убедиться в правильности результата, достаточно на листе Excel разместить кнопку CommandButton1 и поле TextBox1, а в событийную процедуру CommandButton1_Click включить инструкции:

Dim I As Integer, F As Single

F = 3 * (-1.5 ^ 2)

I = 3 * (-1.5 ^ 2)

TextBox1.Text = "F=" & Format(F, "0.00") & "I=" & Str(I)

Выйдя из режима конструктора и нажав кнопку, увидим в поле TextBox1 результаты.

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

Приведенная выше процедура иллюстрирует и конкатанацию (&) – слияние строк. К строке «F=»прибавляется строка, содержащая отформатированное значение F (с двумя цифрами после десятичной точки). К этой объединенной строке добавляется «I=» и далее – превращенное в последовательность символов (в строку) число I.

Операции сравнения используют для сравнения чисел, значений переменных, констант, ячеек таблиц. Результат операции сравнения имеет тип Boolean и может принимать значение True или False (Таблица 4).

Таблица 4

Операции сравнения

Операция

Наименование

Пример (R имеет тип Boolean)

Результат ®

=

Равно

R = (10=5)

False

>

Больше

R = 10>5

True

<

Меньше

R = 10<5

False

>=

Больше

или равно

R = “a” >= “b”

False

<=

Меньше

или равно

R = “a” <= “b”

True

<>

Не равно

R = “a” <> “b”

True

В логических операциях (таблица 5) не только результат, но и операнды имеют тип Boolean.

Таблица 5

Логические операции

Операция

Наименование

And

Логическое умножение

Or

Логическое сложение

Xor

Исключающее Or (или)

Not

Логическое отрицание

Поясним назначение таких операций на простом примере. Пусть переменная типа Boolean с именем R должна принимать значение True, если точка с координатами X,Y попадает в прямоугольную область, ограниченную координатами X1,X2 и Y1,Y2. Если точка за пределами прямоугольника, то R = False. Применив логическую операцию AND (И), вычислим значение R:

R = (X>=X1) AND (X<=X2) AND (Y>=Y1) AND (Y<=Y2).

Смысл этой операции в том, что если и первое выражение (X больше или равно X1) истинно, и второе, и третье, и четвертое истинно, то R = True. Если один из операндов логической операции AND представляет собой ложное выражение (утверждение), то и результатом будет False.

Кроме операции AND, к числу часто используемых логических операций относятся OR и NOT. Первая из них дает результат True, если истинно хотя бы одно выражение, являющееся операндом. Операция NOT изменяет результат на противоположный, подобно смене знака в арифметическом выражении. Вычислим R с помощью этих операций:

R = NOT ((X<X1) OR (X>X2) OR (Y<Y1) OR (Y>Y2)).

Выражение, стоящее в скобках после операции NOT, истинно (True), если точка левее или правее, или ниже, или выше воображаемого прямоугольника, т.е. если точка в него не попала. В этом случае R будет иметь значение False благодаря логическому отрицанию NOT.

Несколько реже используются логические операции XOR (исключающее ИЛИ), EQV (эквивалентность) и IMP (импликация). Первая из них дает результат True, если только одно из выражений-операндов имеет результат True. Результатом операции EQV будет True, если выражения-операнды дают одинаковый результат. Результатом IMP будет True, если выражения-операнды дают разные результаты.

Генератор случайных чисел (Randomize, RND)

Иногда в программе нужно где-нибудь применить случайное число. Для этого в Бэйсике существует функция RND: она возвращает число между 0 (включительно) и 1 (исключительно), но какое именно – чистая случайность! Чтобы получить случайное значение между 0 и каким-нибудь другим числом, например, между 0 и 256, случайное число можно просто умножить на это число: RND * 256 выдаст случайное число между 0 (включительно) и 256 (исключительно). Компьютер берёт случайные числа из, так сказать, одинаково рассортированных карт.

Часто используемые встроенные функции Visual Basic представлены в таблице 6.

Таблица 6

Часто используемые встроенные функции Visual Basic

Функция

Содержание арифметической функции

1

2

Abs(x)

Возвращает значение, тип которого совпадает с типом переданного аргумента Х, равное абсолютному значению указанного числа

Atn(x)

Возвращает значение типа Double, содержащее арктангенс числа Х

Cos(x)

Возвращает значение типа Double, содержащее косинус угла Х

Exp(x)

Возвращает значение типа Double, содержащее результат возведения числа е (основание натуральных логарифмов) в указанную степень

Fix(x)

Возвращает значение типа, совпадающего с типом аргумента, которое содержит целую часть числа, ближайшее отрицательное целое число, большее либо равное указанному Х

Int(x)

Возвращает значение типа, совпадающего с типом аргумента, которое содержит целую часть числа, ближайшее отрицательное целое число, меньшее либо равное указанному Х

Log(x)

Возвращает значение типа Double, содержащее натуральный логарифм числа Х

Rnd(x)

Возвращает значение типа Single, содержащее случайное число

Sgn(x)

Возвращает значение типа Variant (Integer), соответствующее знаку указанного числа. Обязательный аргумент: число Х может представлять любое допустимое числовое выражение. Возвращаемое значение: Х>0, то Sgn(x) возвращает 1; если Х равняется нулю, то 0; если X<0, то -1

Sin(x)

Возвращает значение типа Double, содержащее синус угла Х

Sqr(x)

Возвращает значение типа Double, содержащее квадратный корень указанного числа

Tan(x)

Возвращает значение типа Double, содержащее тангенс угла Х

Категория функций

Примеры функций

Строковые

LCASE( ) – преобразование строки в строчные буквы

UCASE( ) – преобразование строки в заглавные буквы

LEN( ) – определение длины строки и др.

INSTR( ) – позиция первой встречи одной строки внутри

Другой

Даты и времени

DATE( ) – текущая дата

TIME( ) – текущее время

NOW( ) – текущая дата и время

DAY( ) – номер дня года и др.

Продолжение таблицы 6

1

2

Преобразования

типов данных

CINT( ) – действительного числа в целое (с округлением)

CSTR( ) – числа в строку символов

CVAR( ) – преобразование в тип данных VARIANT

FORMAT( ) – форматирование данных, формирование строк

VAL( ) – преобразование строки символов в число и др.

Создание интерфейса пользователя.

Ход работы.

  1. Меню Вид/Панели инструментов/Visual Basic.

  2. Кнопкой в виде молоточков вывести на экран панель, содержащую «Элементы управления».

  3. Перейти в «Режим конструктора» – кнопка с изображением треугольника и карандаша.

  4. Кнопкой в виде листочка с указательным пальцем вывести окно «Свойства».

Создание программы на Visual Basic состоит из двух взаимосвязанных процессов:

а) конструирования формы, с которой пользователь будет вести диалог; б) кодирования, определяющего характер работы программы.

Форма – это окно будущего приложения. Когда начинаем создавать новый проект, Visual Basic создает пустую форму и присваивает ей заголовок UserForml. На форме изображаются различные части программы – объекты или элементы управления: окна, списки, кнопки, переключатели, линейки прокрутки и т.д. Сама форма рассматривается Visual Basic как объект.

Элементы управления создаются на основе шаблонов, расположенных в окне инструментария. В момент создания формы (рисунок 4) можно изменять положение, размеры и другие атрибуты объектов, однако объекты остаются неактивными, то есть с помощью их нельзя выполнить никаких операций.

При запуске законченного приложения Visual Basic убирает весь инструментарий. Компоновка элементов окна формы фиксируется, объекты управления можно активизировать и работать с программой как задумано. Приложение берет управление на себя, a Visual Basic исполняет операторы программы.

Рисунок 4 – Создание формы в редакторе VBA