Программирование - это просто
Advertisement
Главная arrow Уроки программирования arrow Уроки Visual Basic arrow Visual Basic. Урок 2: "Обработчики событий (CommandButton, MouseMove)"
28.02.2024 г.
Главное меню
Главная
Интернет магазин
Программные продукты
Биржевые роботы
Искусственный интеллект
Математика и информатика
1С:Предприятие
Уроки C#
Уроки Delphi
Уроки программирования
Web-программирование
Дизайн и графика
Компьютер для блондинок
Исходники
Статьи
Платный раздел
Рассказы про компьютеры
Хитрости и секреты
Системный подход
Размышления
Наука для чайников
Друзья сайта
Excel-это не сложно
Все о финансах
.
Visual Basic. Урок 2: "Обработчики событий (CommandButton, MouseMove)" Печать E-mail
Автор megabax   
23.08.2009 г.
Первые шаги в программировании на Visual Basic

 Visual Basic: обработчики событий (CommandButton, MouseMove)

В прошлый раз мы создали простейшую программу, которая выводит "Hello, world". Теперь пришло время заняться чем нибудь посерьезнее. Давайте для начала сделаем нормальную надпись на кнопке. Для этого убедимся, что у нас на кнопке установлен фокус, если нет, щелкнем на нее, что бы она стала обведена квадратиками, как на рисунке*:

 

CommandButton, MouseMove

 

Затем переключимся на панель свойств, найдем там свойство Caption и напишем в нем "Нажми на меня". Заодно и имя объекта сделаем не Command1, а cbClickMy*:

 

 

CommandButton, MouseMove

 

 

Теперь давайте поместим на форму Label и назовем ее (свойство Name) lbComment*:

 

CommandButton, MouseMove

 

 

Щелкнем по кнопке, что бы переключиться на редактор кода. Сверху два списка выбора для выбора объектов и событий. Для объекта cbClickMy выберем событие MouseMove*.

 

CommandButton, MouseMove

 

Теперь введем в созданный шаблон код обработчика события. Вот как он будет выглядеть:

Private Sub cbClickMe_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    lbComment.Caption = "Мышка на кнопке"
End Sub

 

Если мы запустим эту программу, то при наведении на кнопку мышкой у нас надпись из "Label1" становиться "Мышка на кнопке".  Правда, когда мы убираем мышку с кнопки, надпись никуда не исчезает. Что бы надпись убрать, щелкнем на самой форме, и таким же макаром создадим обработчик события MouseMove:

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    lbComment.Caption = ""
End Sub

 

(C) Шуравин Александр

 


Скриншоты, помеченные знаком *, являются цитатами и иллюстрациями  программного продукта "Microsoft Visual Studio", авторское право на который принадлежит корпорации Microsoft.. 


 

 

Последнее обновление ( 04.12.2010 г. )
 
« След.   Пред. »
 
© 2024 Программирование - это просто
Joomla! - свободное программное обеспечение, распространяемое по лицензии GNU/GPL.
Русская локализация © 2005-2008 Joom.Ru - Русский Дом Joomla!
Design by Mamboteam.com | Powered by Mambobanner.de
Я принимаю Яндекс.Деньги