![]() Главная страница Случайная страница КАТЕГОРИИ: АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника |
Порядок выполнения. 1. Установите на форме следующие объекты и измените им свойства: 1 часть
1. Установите на форме следующие объекты и измените им свойства: 1 часть
2.
Приведите свою форму в соответствие с образцом
3. В окне кода процедуры обработки события Click для объекта Cmd1 набрать: n1 = Val(Txt1.Text) n2 = Val(Txt2.Text) n3 = Val(TxtStep.Text) Cls For i = n1 To n2 Step n3 Print i Next i 4. Проверьте работу программы для различных значений параметров оператора цикла
5. В окне кода процедуры обработки события Click для объекта Cmd2 набрать:
s = Text1.Text k = Len(s) b = " " For i = k To 1 Step -1 b = b + Mid(s, i, 1) Next i Text2.Text = b 6. Проверьте работу программы на различных фразах, в том числе на следующих фразах: А РОЗА УПАЛА НА ЛАПУ АЗОРА АРГЕНТИНА МАНИТ НЕГРА
7. Добавьте на форму следующие объекты и измените им свойства
8. В окне кода процедуры обработки события Click для объекта Cmd3 набрать n = TxtNum.Text For i = 1 To 10 PicTabl.Print i; " * "; n; " = "; n * i Next i 9. Проверьте работу программы
|