|
|
|
|
|
Dicas
|
|
Visual Basic (ActiveX/Controles/DLL)
|
|
|
Título da Dica: Redimensiona Qualquer coisa no Form
|
|
|
|
Postada em 1/3/2007 por Edinei
neisjb@hotmail.com
'Coloque um Label no form, veja que o label esta com o MouseMove
Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 1 Then Label1.Left = Label1.Left + X Label1.Top = Label1.Top + Y End If End Sub
|
|
|
|
|