Страница 1 из 1

"Убегающая кнопка"

Добавлено: 12 сен 2005, 11:26
TOT
Господа, кто знает и кому не лень подскажите, пожалуйста, как реализовать в VBA Excel этот прикольчик (при наведении курсора на кнопку на форме форма убегала).
Спасибо!

Добавлено: 12 сен 2005, 19:59
pashulka
Попробуйте использовать что-то вроде :

Код: Выделить всё

Private Sub CommandButton1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
Me.Move Me.Left + 5
End Sub

Добавлено: 13 сен 2005, 11:56
TOT
pashulka, СПАСИБО!