Senhores,

Estou com um probleminha. Tenho que bloquear o movimento do formulário para cima, ou seja, para esquerda, direita e para baixo, poderá ser movimentado, exceto para cima. Como faça para bloquear o movimento do formulário para cima?

 

Desde já agradeço a todos,

 

Não sei se isto vai resolver o seu problema.

Coloque um timer no seu form com o seguinte codigo

Deixe o intervalo do timer bem pequeno

Fixei um top de 2000 como exemplo

vc pode mover o Form para baixa, para a direita e esquerda e para cima até o limite de top 2000

 

Private Sub Timer1_Timer()
    If Form1.Top <= 2000 Then
        Form1.Top = 2000
    End If
End Sub

Um abraço

Silvio

Cara muito obrigado, mas eu consegui tudo que queria com o código abaixo:

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Me.Top < 30 Then
        Me.Top = 30
    End If
End Sub

 

Mesmo assim obrigado.