Студопедия
rus | ua | other

Home Random lecture






Практическая работа 8. Логические операторы, конкатенация


Date: 2015-10-07; view: 482.


Первое упражнение - логические операторы сводится к вводу в текстовые поля txtOper1, txtOper2 данных ( Oper1, Oper2 - комбинаций True и False ) и изучению результатов, выводимых в текстовые поля txtNot.Text : txtImp.Text, расположенные ниже горизонтально, Последовательность действий:

1. создать на форме: объект CommandButton, 2 текстовых поля для ввода данных (значений переменных Oper1, Oper2 ), вверху формы, 6 объектов TextBox для вывода результатов и 9 объектов Label, для создания надписей,

2. задать значения свойства Name объектов, см. код процедуры Command1_Click () и

3. ввести код

Private Sub Command1_Click()Dim Oper1 As Boolean, Oper2 As BooleanOper1 = CBool(txtOper1.Text)Oper2 = CBool(txtOper2.Text)txtNot.Text = Not Oper1txtAnd.Text = Oper1 And Oper2txtOr.Text = Oper1 Or Oper2txtXor.Text = Oper1 Xor Oper2txtEqv.Text = Oper1 Eqv Oper2txtImp.Text = Oper1 Imp Oper2End Sub

4. вводить комбинации данных в поля txtOper1 и txtOper2, делать щелчки на командной кнопке, анализировать результаты,

5. создать вторую форму; на первой форме создать вторую командную кнопку и ввести код процедуры Command2_Click ():

Unload MeForm2.Show

После старта проекта для перехода ко второй форме нужно сделать щелчок на этой командной кнопке.


Рис. 1.11.Логические операторы

Второе упражнение - конкатенация.

1. Создать на форме 3 текстовых поля (Name=txtConc, Name=txt1, Name=txt2), объект CommandButton,

 


Рис. 1.12.Конкатенация, схема формы

 

2. ввести код процедуры Command1_Click ():

txtConc.Text = txt1.Text & txt2.Text' txtConc.Text = Val(txt1.Text) & Val(txt2.Text)' txtConc.Text = Val(txt1.Text) + Val(txt2.Text)

3. стартовать проект, сделать щелчок на второй командной кнопке первой формы; выводится вторая форма,

4. ввести в текстовые поля txt1 и txt2 данные типа String, сделать щелчок на командной кнопке, происходит соединение строк,

5. снять комментарий со второй строки кода, поставить комментарий перед первой строкой. Ввести в текстовые поля txt1 иtxt2 числа, сделать щелчок на командной кнопке - происходит соединение чисел,

6. снять комментарий с третьей строки кода, поставить комментарий перед первой и второй строками, ввести в текстовые поля числа, сделать щелчок на командной кнопке - происходит сложение чисел.


<== previous lecture | next lecture ==>
B. Ввод обоих операндов в текстовые поля | Инструкции
lektsiopedia.org - 2013 год. | Page generation: 0.096 s.