Трусов M. А. Visual Basic .NЕТ Практическое руководство для начинающего программиста стр.76
Трусов M. А. Visual Basic .NЕТ Практическое руководство для начинающего программиста стр.76

Осталось задать свойству TransparencyKey значение Control (если вы не перекрасили форму в другой цвет). Так вы сделаете форму прозрачной. Свойству же ForrmBor der Style необходимо задать значение None. В результате форма не будет иметь границ и заголовка. Теперь запустите программу и убедитесь, что форма представляет собой созданный вами рисунок.

ГЛАВА 1ST Несколько полезных программ

Рис. 15.1 ▼ Окно овальной формы.

События KeyPress, KeyDown, KeyUp

Управлять действиями программы можно при помощи клавиатуры. Перечисленные события происходят, когда клавиша удерживается в нажатом состоянии (KeyPress), клавиша нажата (KeyDown), отпущена (KeyUp). Выбрать клавиши мы можем по своему усмотрению.

Составим процедуры обработки. Для этого откройте меню Class Name в окне редактора кодов и выберите Form 1 Events. Затем в меню Method Name щелкните Key-Press. В результате будет создана процедура обработки события Forml_KeyPress. Точно так же создайте процедуры Forml_KeyDown и Forml_KeyUp. Затем разместите на форме надпись Label 1 и составьте следующие коды:

Private Sub Forml_KeyPress (ByVal sender As _ Object, ByVal e As System.Windows.Forms. _ KeyPressEventArgs) Handles My Base.KeyPress

Dim a As Integer

a = Labell.Left

Трусов M. А. Visual Basic .NЕТ Практическое руководство для начинающего программиста

События MouseDown, MouseUp, MouseMove

If e.KeyChar = "d" Then a = a + 1 Label1.Left = a End Sub

Private Sub Forml_KeyDown (ByVal sender As Object, _ ByVal e As System.Windows.Forms.KeyEventArgs) _ Handles MyBase.KeyDown

If e.KeyCode = Keys.A Then Label1.BackColor_ = Color.Black End Sub

Private Sub Forml_KeyUp (ByVal sender As Object, _ ByVal e As System.Windows.Forms.KeyEventArgs) _ Handles MyBase.KeyUp

If e.KeyCode = Keys.В Then Label1.Text = _

"надпись"

End Sub End Class

В событии Key Press нужная буква задается в строковом режиме. Очень важно при этом не путать установку языка на клавиатуре - если в кодах напечатана английская буква, то и при запуске программы не забудьте перевести клавиатуру на английский язык. В данном случае допустимо использование любых клавиш: как цифровых, так и буквенных, а также Ехс, Tab, Backspase, Enter. Все остальные клавиши для этого события не годятся.


⇐ Предыдущая Следующая ⇒
 
 
 
Powered by Exponenta