Page 68 - 4450
P. 68
Оператор „+” працює як з текстовими рядками, так і з
числами. Оскільки за замовчуванням введені дані
повертаються у вигляді тексту, Visual Basic інтерпретує
значення First і Second як текст при застосуванні операції
додавання. Visual Basic здійснить об'єднання, чи
конкатенацію, замість того, щоб арифметично скласти
значення. (Наприклад, «100» + «17» буде дорівнювати
«10017».)
Якщо, продивитися зміст вікна Code і розглянути чотири
формули, що використовують основні математичні операції.
У першій формулі процедури використовується операція
додавання (+) умовній структурі If...Then:
If Optionl. Value = True Then
Labell. Caption = First + Second End If
Якщо властивість Value (Значення) першої кнопки
вибору встановлена в True (Істина), то змінні додаються
операцією +, а результат присвоюється полю Labell. В трьох
інших формулах використовується той же принцип: у кожній
з них застосовується структура If...Then і властивість Caption
(Напіс) об'єкта Labell (Підписи).
Ідентифікація користувача за допомогою структури
If...Then
Створити програму.
Private Sub Command1_Click()
UserName = InputBox("Введіть Ваше ім'я.")
If UserName = "Лаура" Then
MsgBox ("Ласкаво просимо, Лаура! Ви готові до
включення ПК?")
Form1.Picture = LoadPicture("c:\1.bmp")
ElseIf UserName = "Макс" Then
MsgBox ("Ласкаво просимо, Макс! Ви готові до показу
картотеки?")
Form1.Picture = LoadPicture("c:\2.bmp")
Else
MsgBox ("Вибачте! Я Вас не знаю:")
End
End If
End Sub
66