Студопедия
Случайная страница | ТОМ-1 | ТОМ-2 | ТОМ-3
АрхитектураБиологияГеографияДругоеИностранные языки
ИнформатикаИсторияКультураЛитератураМатематика
МедицинаМеханикаОбразованиеОхрана трудаПедагогика
ПолитикаПравоПрограммированиеПсихологияРелигия
СоциологияСпортСтроительствоФизикаФилософия
ФинансыХимияЭкологияЭкономикаЭлектроника

Использование элементов управления

ОСНОВЫ ЯЗЫКА ПРОГРАММИРОВАНИЯ VISUAL BASIC | Свойства, методы и события | Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) frmPaint.PSet (X, Y) End Sub | Private Sub cmd1_Click() If Len(txtFileName.Text) Then End If End Sub | Использование списков |


Читайте также:
  1. II. Использование мастера отчетов
  2. II. Использование уличных телефонных кабин
  3. II. Формы управления учреждением. Перечень и порядок принятия локальных нормативных актов.
  4. II.1 Использование мастера запросов для создания простых запросов с группированием данных
  5. II.II.2. Западный стиль управления - особенности теории и практики
  6. III. Использование коечного фонда
  7. III. Использование конструктора отчетов

Создание Windows-приложений в Visual Basic практически невозможно без использования элементов управления, так как они позволяют пользователю взаимодействовать с этими приложениями. Набор таких элементов управления не ограничен и может расширяться за счет так называемых пользовательских элементов управления.

Почти во всем приложениях используется кнопка (CommandButton) для того, чтобы начать, прервать или закончить какой-либо процесс. Главным событием для кнопки является Click. Кроме этого события, у кнопки могут быть и другие, но они применяются редко.

Текстовые поля (TextBox), метки (Label) и списки (ListBox) обычно используются для ввода и вывода данных, графические окна (PictureBox) - для вывода графики, переключатели (CheckBox) и флажки (OptionsButton) - для организации диалога.

Рассмотрим пример. Создадим приложение, реализующее либо сложение чисел, либо конкатенацию строк.

Разместите на форме следующие управляющие элементы и задайте им свойства, указанные в таблице:

 

Объект Свойство Значение
Форма имя frmCalc
Caption Калькулятор
Текстовое поле - TextBox имя txt1
text "" (пустая строка)
Текстовое поле - TextBox имя txt2
text "" (пустая строка)
Текстовое поле - TextBox имя txtResult
text "" (пустая строка)
Кнопка - CommandButton имя cmdPlus
Caption Сложить
Кнопка - CommandButton имя cmdSplic
Caption Склеить
Надпись - Label Caption + (плюс)
Надпись - Label Caption Результат

Напишем процедуру обработки щелчка на кнопке "Склеить".

Так как для кнопки основное событие - щелчок, то окно кода можно вызвать двойным щелчком по кнопке в окне формы.

Private Sub cmdSplic_Click()
txtResult.Text = txt1.Text + txt2.Text
End Sub

В Visual Basic оператор + (плюс) может использоваться как для математического сложения, так и для соединения (конкатенации) строк.
Поэтому при сложении лучше использовать символ +, а при соединении строк — символ &. В противном случае могут возникнуть неожиданные последствия.

Private Sub cmdSplic_Click()
txtResult.Text = txt1.Text & txt2.Text
End Sub

Проверим работу приложения. Введем в текстовые поля какой-то текст и нажмем кнопку "Склеить".

 

Теперь займемся обработкой события щелчка по кнопке "Сложить". Перед суммированием значений текстовых полей их необходимо преобразовать в числа. Функция VAL(s$) - преобразует числовую часть начала строки в число.

Private Sub cmdPlus_Click()
txtResult.Text = Val(txt1.Text) + Val(txt2.Text)
End Sub

Готово!

 

Для быстрого открытия меню или вызова команды используются горячие клавиши. Для определения горячих клавиш достаточно в свойстве Caption перед соответствующей буквой поставить амперсанд (&). Например, для быстрого вызова команды "Сложить" в Caption необходимо ввести "&Сложить". Если же в качестве горячих клавиш нужно определить [Alt+к] для кнопки "Склеить", то в свойство Caption следует задать "С&клеить".    
Теперь вместо нажатия на кнопки "Склеить" и "Сложить" можно использовать комбинации клавиш: [Alt + к] и [Alt + с]. Вот теперь - готово!  

 


Дата добавления: 2015-07-16; просмотров: 41 | Нарушение авторских прав


<== предыдущая страница | следующая страница ==>
Dim intPrevX As Integer Dim intPrevY As Integer| Использование переключателей и флажков

mybiblioteka.su - 2015-2024 год. (0.006 сек.)