Visual Basic. Разработка приложений: теория и практика. Ищенко В.А - 69 стр.

UptoLike

ВУЗ: 

ВГУ | Воронеж

Составители: 

Рубрика: 

69
Продолжение табл. 10
1 2 3 4 5
Переключа-
тель
OptionButton1 Обращение1
Caption – Гос-
подин
Переключа-
тель
OptionButton2 Обращение2
Caption – Гос-
пожа
Командная
кнопка
CommandButton CmdPrint
Caption – Напе-
чатать наклейку
4. Задать форме и объектам управления, расположенным на ней, дополни-
тельные различные свойства.
5. В проекте при разработке программных кодов использовались следую-
щие функции:
• Cmd - возвращает часть аргументов командной строки, используе-
мой при запуске MS Visual Basic или выполняемой программой,
разработанной с помощь VB. В нашем примере – представляет ин-
формацию об аргументах, возвращаемую
функцией Command.
• Str – преобразует числовое выражение в строку.
6. Ввести программный код для объекта управления CommandButton -
Напечатать наклейку, поместив в событие Click () следующие опера-
торы:
Private Sub cmdPrint_Click()
strИмя$ = Имя.Text
strФамилия$ = Фамилия.Text
strАдрес$ = Адрес.Text
strГород$ = Город.Text
strПочтовыйИндекс$ = Format(ПочтовыйИндекс.Text, “000000")
If Обращение1.Value Then strОбращение$ = "Господин"
If Обращение2.Value Then strОбращение$ = "Госпожа"
Строка1$ = strОбращение$& " "& strФамилия$ &" "&strИмя$
Строка3$ = strГород$ & ", " & strПочтовыйИндекс$
Наклейка.Print Строка1$
Наклейка.Print strАдрес$
Наклейка.Print Строка3$
End Sub
7. Разработать программный код для объекта управления КнопкаВыход.
8. Ввести программный код для объекта управления КнопкаОчистить,
поместив в событие Click () следующие операторы:
Private Sub КнопкаОчистить_Click()
Имя.Text = " "
Фамилия.Text = " "
Адрес.Text = " "
Город.Text = " " 
                                  69
                                                 Продолжение табл. 10
        1              2               3             4         5
   Переключа-                                Caption – Гос-
                OptionButton1   Обращение1
   тель                                      подин
   Переключа-                                Caption – Гос-
                OptionButton2   Обращение2
   тель                                      пожа
   Командная                                 Caption – Напе-
                CommandButton   CmdPrint
   кнопка                                    чатать наклейку

4. Задать форме и объектам управления, расположенным на ней, дополни-
   тельные различные свойства.
5. В проекте при разработке программных кодов использовались следую-
   щие функции:
    • Cmd - возвращает часть аргументов командной строки, используе-
       мой при запуске MS Visual Basic или выполняемой программой,
       разработанной с помощь VB. В нашем примере – представляет ин-
       формацию об аргументах, возвращаемую функцией Command.
    • Str – преобразует числовое выражение в строку.
6. Ввести программный код для объекта управления CommandButton -
   Напечатать наклейку, поместив в событие Click () следующие опера-
   торы:
     Private Sub cmdPrint_Click()
     strИмя$ = Имя.Text
     strФамилия$ = Фамилия.Text
     strАдрес$ = Адрес.Text
     strГород$ = Город.Text
     strПочтовыйИндекс$ = Format(ПочтовыйИндекс.Text, “000000")
     If Обращение1.Value Then strОбращение$ = "Господин"
     If Обращение2.Value Then strОбращение$ = "Госпожа"
     Строка1$ = strОбращение$& " "& strФамилия$ &" "&strИмя$
     Строка3$ = strГород$ & ", " & strПочтовыйИндекс$
     Наклейка.Print Строка1$
     Наклейка.Print strАдрес$
     Наклейка.Print Строка3$
     End Sub
7. Разработать программный код для объекта управления КнопкаВыход.
8. Ввести программный код для объекта управления КнопкаОчистить,
   поместив в событие Click () следующие операторы:
      Private Sub КнопкаОчистить_Click()
      Имя.Text = " "
      Фамилия.Text = " "
      Адрес.Text = " "
      Город.Text = " "

Страницы