Глава 5. 1. Поместить на форму четыре метки для изображения базо­вых логических элементов и шесть текстовых полей для ввода и вывода логических значений

Модель полусумматора

1. Поместить на форму четыре метки для изображения базо­вых логических элементов и шесть текстовых полей для ввода и вывода логических значений.

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

Dim blnA, blnB, blnP, blnS As Boolean Sub cmdl Click ()

= txtA.Text = txtB.Text = blnA And = (blnA Or.Text = blnP txtOtr.Text = Not txtOr.Text = blnA txtS.Text = blnS End Sub

3. Запустить проект, ввести логические значения аргументов и щелкнуть по кноп­ке Перенос и сумма. В текстовые поля бу­дут выведены логиче­ские значения на выходах логических элементов.

Проект хранится в каталоге
\textbook\VB\prjLog\ ____________

CD-ROM p^