Теоретический материал

a) К пункту 3)

Функция InputBox отображает модальное окно диалога, в котором содержится просьба о вводе пользователем некоторых данных. Пока не завершится диалог с модальным окном, переключиться в другое диалоговое окно невозможно.

Упрощенный вариант синтаксиса функции следующий:

InputBox(Приглашение [,Заголовок] [,НачЗначение])

Приглашение — строковое выражение, отображаемое как сообщение в диалоговом окне, которое служит подсказкой пользователю;

Заголовок — Строковое выражение, отображаемое в строке заголовка диалогового окна. По умолчанию в строку заголовка выводится имя приложения;

НачЗначение — по умолчанию поле ввода изображается пустым, но пользователь может отобразить любую строку.

Следующий код отображает окно ввода, показанное на Рис. 4 ниже

Private Sub Label2_Click()

X =InputBox("Введите Ваше имя", "Заголовок проекта")

End Sub

Переменной X будет присвоено значение ЕКАТЕРИНА,введенное пользователем.

Рис. 4 Модальное окно диалога

b) К пунктам 4, 5

Функция — Rnd (number)

Возвращает очередное значение псевдослучайной последовательности — число в диапазоне от 0 до 1 с типом данных Single(вещественное число одинарной точности). Аргумент number — любое числовое выражение. Можно вызвать функцию без аргумента, т.е. Rnd()илиRnd.

Здесь надо иметь ввиду, что функцияRndимитирует случайную величину, распределенную равномерно на отрезке [0,1], причем с необходимой погрешностью, обусловленной конечностью разрядной сетки компьютера.

Если требуется получить значения псевдослучайных чисел в интервале, отличном от интервала [0,1], скажем в интервале [a,b], достаточно использовать выражение (b-a)*Rnd + a, т.е. написать оператор присвоения Х =(b-a)*Rnd + a

Однако функция Rnd при каждом запуске приложения всегда генерирует одну и ту же последовательность чисел, вне зависимости от необязательного аргумента, если только он не отрицателен.

При работе в среде программирования Visual Basic вместе с функциейRndможно использовать инструкциюRandomize (number), котораяинициализирует генератор случайных чисел. Здесь numberтипаVariantлюбого числового субтипа. Если аргумент numberв инструкцииRandomize отсутствует, в качестве "затравки" для генератора псевдослучайных чисел, используется значение системного таймера, инструкция при этом имеет следующий синтаксис: Randomize Timer

c) К пункту 7

Для программной установки значения свойства объекту применяется следующий синтаксис, так называемая точечная нотация:

Объект.Свойство = значение свойства

Примеры операторов устанавливающих значения свойств объекту Text1

Text1.Visible = True 'Отображает текстовое поле, т.е. делает его видимым.

Text1.Text = "Привет" ' Отображает слово 'Привет' в тестовом поле

* Только при работе в среде программирования Visual Basic (VB).

* Только при работе в среде программирования VB

[*] Пункт 4) использовать при работе в среде программирования Visual Basic. При работе в среде Visual Basic for Application инструкцию Randomize Timerиз кода программы исключить, элемент Timer на форме не размещать за его отсутствием в наборе элементов ToolBox.

Поиск по сайту: