Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: osmor
Private Sub Form_Load() Me.KeyPreview = True End Sub Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case vbKeyUp Call MoveMe(True) Case vbKeyDown Call MoveMe(False) Case Else End Select End Sub
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.