Полезное:
Как сделать разговор полезным и приятным
Как сделать объемную звезду своими руками
Как сделать то, что делать не хочется?
Как сделать погремушку
Как сделать так чтобы женщины сами знакомились с вами
Как сделать идею коммерческой
Как сделать хорошую растяжку ног?
Как сделать наш разум здоровым?
Как сделать, чтобы люди обманывали меньше
Вопрос 4. Как сделать так, чтобы вас уважали и ценили?
Как сделать лучше себе и другим людям
Как сделать свидание интересным?
Категории:
АрхитектураАстрономияБиологияГеографияГеологияИнформатикаИскусствоИсторияКулинарияКультураМаркетингМатематикаМедицинаМенеджментОхрана трудаПравоПроизводствоПсихологияРелигияСоциологияСпортТехникаФизикаФилософияХимияЭкологияЭкономикаЭлектроника
Вывод данных
|
|
Вывести данные можно в компоненты Label, TextBox. Для этого используются свойства Caption и Text, например,
Label1.Caption = “Программа на VBA”
Label1.Caption = Str (X)
TextBox1.Text = “Программа на VBA”
TextBox1.Text = Str (X)
Вывести данные можно в диалоговое окно. Процедура MsgBox выводит на экран диалоговое окно, содержащее сообщение.
MsgBox (Promt [, Buttons] [,Title] [, Helpfile, Context])
Promt —строковое выражение, отображаемое как сообщение в диалоговом окне.
Buttons — числовое выражение, определяющее количество и тип отображаемых кнопок.
Title — текст в заголовке.
Helpfile, Context — определяет файл справочной системы и номер соответствующего раздела.
Пример:
MsgBox Str(a + b) + ", Пример",, "Заголовок"
Здесь выводится сумма двух переменных и слово пример. Слово «Заголовок» выводится в строке заголовка окна.
| Пример обработчика события, содержащего процедуру MsgBox | Рабочее окно | Окно процедуры MsgBox |
| Private Sub CommandButton1_Click() a = Val(TextBox1.Text) b = Val(TextBox2.Text) MsgBox Str(a + b) + ", Пример",, "Заголовок" End Sub | 
| 
|
Date: 2015-07-11; view: 420; Нарушение авторских прав