Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
лекции / ТСАиУ.doc
Скачиваний:
57
Добавлен:
22.02.2014
Размер:
1.28 Mб
Скачать

2.3. Работа в среде визуального редактора Visual Basic 6.0.

2.3.1. Интерфейс и форма

Прежде всего, создадим интерфейс, который позволит нам общаться с редактором. Откроем новый проект и в нём создадим форму, в которой разместим различные объекты для ввода-вывода информации и управления программой. Для этого выполним следующие действия. C:\ Program File \ Microsoft Visual Studio \ Vb 98 \ Vb6.exe \ New \ Открыть – открытие окна редактора нового проекта Microsoft Visual Basic [Design]. В окне редактора расположено окно проекта, состоящее из окна формы Form 1.

Сохраним построенное.

File \ Save Project \ Save File As – Имя файла \ Save Project As – Имя проекта.

Любая среда программирования является универсальной системой и её подробное изучение является самостоятельной задачей. Нам же необходимо уже сейчас писать программы управления определёнными типами устройств, например, для программируемых логических контроллеров (ПЛК), где применяется ограниченное число операторов и типов данных. Поэтому для написания таких программ воспользуемся следующим приёмом. Будем писать фрагменты программ, выполняющих управление определённым набором действий типовой системы, и подробно их комментировать, а затем из них составлять более сложные программы.

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

Таблица 2.7.

Тип переменной

Значение

Память

Integer

Целое число одинарной точности

2 байта

Long

Целое число двойной точности

4 байта

Single

Десятичное число с плавающей точкой одинарной точности

4 байта

Double

Десятичное число с плавающей точкой двойной точности

8 байта

Currency

Десятичное число с фиксированной точкой. Целая часть представлена 15 цифрами, дробная – четырьмя.

8 байта

String

Строка текста

1 байт / символ

Byte

Целое число

1 байт

Boolean

Логическое значение

2 байта

Date

Дата и время

8 байт

Object

Экземпляр класса; объект типа OLE

4 байта

Variant

Любой из вышеперечисленных типов

16 байт

2.3.2. Программа выполнения логических операций с переменными типа «Byte».

Рассмотрим данные, которые хранятся в формате “Byte”. Этот формат имеет длину 8 бит и может хранить 256 слов двоичной информации. Ввод данных осуществляется в виде десятичного числа, которое автоматически преобразуется в двоичную форму. Логическая обработка информации осуществляется поразрядно (побитно). В этом формате выполняются логические операции И (AND), ИЛИ (OR), НЕ (NOT), ИСКЛЮЧАЮЩЕЕ ИЛИ (XOR). Функцию ИСКЛЮЧАЮЩЕЕ ИЛИ называют также СУММОЙ ПО МОДУЛЮ ДВА. Чаще всего такие операции применяются при выработке логических команд в системах управления промышленными объектами.

Рассмотрим работу регистров при реализации этих функций. Создадим четыре объекта типа Text Box для ввода переменных и вывода значения функции и четыре командных кнопки Command Button, при нажатии на которые, операции выполняются, и снабдим эти объекты пояснительными текстами (метками Label). Все графические обозначения объектов размещаются в блоке инструментов и сопровождающими всплывающими подписями. Выделим их с помощью курсора и перенесём в форму проекта. Для изменения пояснительных надписей в текстовых полях откроем окна броузера проекта и свойств проекта (Properties), выполнив следующие действия с элементами верхней строки текстового меню:

View \ Project Explorer \ Property Window .

Для изменения текста метки и командной кнопки воспользуемся свойством Caption (заголовок) в свойствах проекта , а для элементов ввода вывода информации – свойством Text. Для придания форме проекта аккуратного вида воспользуемся закладкой меню Format. Теперь надо написать код программы, которая обеспечивает выполнение событий формы. Процедура обработки события – это действия (операторы), которые осуществляются над данными. Данные, используемые в операторах, должны быть определённого типа и эти типы данных должны быть объявлены в программе.

Рис. 2.8. Вид формы и фрагмент кода программы выполнения логических операций с переменными типа «байт».

Программа представляет собой совокупность операторов и надо управлять последовательностью их выполнения. Функционально полный набор управляющих структур состоит из:

- последовательной структуры,

- структуры ветвления,

- структуры цикла.

Перейдём теперь к написанию кода программы выполнения логических операций с переменными типа «байт». Часть фрагмента кода командной кнопки видна на рис. 2.8. Откроем окно кода для формы Form 1. Для этого в ранее созданной форме выделим, например, элемент TextBox и двойным щелчком мыши откроем окно кода Project1 Form1 (Code). В окне появляется текст вида:

Private Sub Text1_Change() ‘ Sub – это процедура с именем Text1

‘ В этой строке помещаются операторы

End Sub ‘Оператор конца процедуры

В описании процедуры :

  • Private означает, что в ней используются локальные переменные, то есть видимые только в этой процедуре или форме; объявление переменной можно поместить в начале текста программы или процедуры ,

  • апостроф означает начало комментария в строке,

  • Text1_Change означает, что операторы процедуры будут выполняться при изменении текста.

Текстом, размещаемым в объекте TextBox, являются данные программы. В нашем случае – это содержимое регистра , представленное десятичным числом в диапазоне от 0 до 255, которое далее будет представлено в двоичной форме. То, что должно произойти с текстом потом, будет описано в других процедурах.

Переходим к написанию содержательной части программы, снабжённой комментариями, которые отделяются от текста программы апострофом

General

Dim a As Byte ‘Объявление локальной переменной a типа «байт»

Dim b As Byte ‘Объявление локальной переменной b типа «байт»

Dim c As Byte ‘Объявление локальной переменной c типа «байт»

Private Sub Command1_Click() ‘Начало выполнения процедуры

‘Command1 по стандартному событию Click. По этой

‘команде происходит вычисление логической функции И

‘ для переменных, размещённых в регистрах R1и R2, а

‘результат помещается в регистр R3

a = Text1.Text ‘переменной a присваивается значение объекта Text1

b = Text2.Text ‘переменной b присваивается значение объекта Text2

c = a And b ‘переменной c присваивается значение логической

‘функции поразрядной конъюнкции битовых

‘представлений операндов a И b

Text3.Text = c ‘Объекту Text3 присваивается значение переменной c

End Sub ‘Оператор конца процедуры Command1

Комментарии следующих процедур выполнить самостоятельно

Private Sub Command2_Click()

c = a Or b

Text3.Text = c

End Sub

Private Sub Command4_Click() 'RESET

Text1.Text = Text4.Text

Text2.Text = Text4.Text

Text3.Text = Text4.Text

End Sub

Private Sub Text1_Change()

End Sub

……………………………

Private Sub Text4_Change()

End Sub

…………………………..

Private Sub Label3_Click()

End Sub