Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
КОНСПЕКТЫ ЛЕКЦИЙ Экон безоп.doc
Скачиваний:
0
Добавлен:
01.05.2025
Размер:
2.94 Mб
Скачать

2.Объявление с помощью суффиксов.

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

Пример: Dim x #

Integer (%)

Long - &

Currency - @

Single (!)

Double (#)

String ($)

Например: Private Nds%

Dim Name$

З. Объявление по первым буквам.

Defint I-M - Переменные, имена которых начинаются с буквы I, J, K, L, M обязаны иметь тип Integer.

Для других типов аналогично: Defsng, Defdbl и т.д.

Инструкции DefТип используются на уровне модуля (т.е. их нельзя использовать внутри процедур) для задания типа данных, используемого по умолчанию для переменных, имена которых начинаются с соответствующих символов.

Как мы можем задать значение той или иной переменной величине? Это можно сделать с помощью оператора присваивания:

Переменная = Выражение

Например: А = 6*х + 3

Тип переменной в левой части должен совпадать с типом выражения в правой части!  И еще: слева от знака равенства не может стоять число или выражение!

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

Чтобы по нашей рассеянности какая-нибудь переменная не проскочила в программу необъявленной, поручим VB выдавать соответствующее сообщение при нашей попытке запустить проект с необъявленными переменными:

[Инструменты-Опции- Editor- Require Variable Declaration].

Отныне в коде любого создаваемого вами проекта будет появляться строка Option Explicit, что означает требование обязательно объявлять переменные этого проекта.

Константы.

Если надо хранить постоянную информацию, не изменяющуюся при выполнении процедуры, то применяются константы.

Для объявления констант и их значений используется следующий оператор:

CONST имя_константы As тип_данных = значение

Пример: CONST Годы_учебы As Byte = 11

При объявлении констант используются те же типы данных, что и при объявлении переменных.

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

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

2. Оператор Print. Способы вывода данных.

Оператор присваивания

Оператор присваивания служит для присвоения переменным и свойствам объектов некоторых значений или выражений.

Формат оператора:

Переменная = Константа A=1200

Переменная = Переменная B=A

Переменная = Выражение Y=B+C+1

Объект.Свойство=Константа

Form1.BackColor=vbRed

Объект.Свойство= Переменная Form1.Width=A

Объект.Свойство=Выражение Form1.Width=A+B

Правила присваивания

Переменная должна стоять слева от знака равенства ( за исключением использования оператора для изменения свойства объекта)

Необходимо, чтобы к моменту выполнения операторов присваивания все переменные были объявлены и значения их были определены, иначе VB присвоит им тип Variant и примет их равными 0

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

  1. Ввод данных с помощью функции InputBox ( )

Переменной присваивается значение текстового поля открывающегося окна для ввода данных.

a = InputBox("Введите первую сторону треугольника", "Ввод данных")

2) Ввод данных при помощи текстовых полей

Переменным присваиваются значения текстовых полей

strNameTov = txtNameTov.Text

intKolTov = txtKolTov.Text

dblCenaTov = txtCena.Text

3) Переменной присваивается значение, рассчитанное по формуле

dblSumma = intKolTov * dblCenaTov

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

Оператор Print.

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

Примеры:

  1. Вывод значения переменных в окне Немедленный:

Debug.Print a,b,c

Debug.Print y+200

Debug.Print «Пройденный путь=»; P; «км»

2) Вывод информации на форме

Print “a+b” a+b

Print “3+2=”; 3+2 3+2=5

3)Вывод информации в текстовом поле

Вывод результата в текстовом поле с 2-мя знаками после запятой

txtPremiya.Text = "Сумма премии, причитающаяся _ каждому студенту =" & Format(dblRazmPrem, "0.00")

Форматирование результатов

Чтобы значение переменной в результате вычислений выводилось как целое число, необходимо при объявлении этой переменной использовать тип Integer(5) или Long(10): Dim a As Integer

Чтобы значения переменных в результате вычислений выводились как десятичные дроби , необходимо при объявлении этих переменных использовать тип Single(7) или Double(15): Dim a As Single (Результат вычисления 100,7866 )

Для вывода переменной в нужном нам формате можно вместо переменной (например Y) написать Format(Y,”0.0000”)

Например:

txtPremiya.Text = "Сумма премии, причитающаяся _ каждому студенту =" & Format(dblRazmPrem, "0.00")

Или

Print “ Сумма премии равна”;

Print Format(dblRazmPrem,”0.00”)