Em alguns casos, é interessante impedir o usuário de mover um form. No VB isto pode ser implementado com APIs:
- Código:
Declare Function GetMenu% Lib "User" (ByVal hWnd%)
Declare Function RemoveMenu% Lib "User" (ByVal hWnd%, ByVal nPosition%, ByVal wFlags%)
'...
Dim Res%
Res = RemoveMenu(GetMenu(Form.hWnd), SC_MOVE, MF_BYPOSITION)
Créditos: Phil Parsons