[curlyfries1999]

Hello.
I am making a program in Visual Basic 2010 Express, and i was wondering if there was a way if the form (form1/me) can be maximized by dragging form1 to the top of the screen. So far I have this code:

If Cursor.Position.Y = Screen.PrimaryScreen.WorkingArea.Height Then
            Me.WindowState = FormWindowState.Maximized
        End If

Thanks in advance.

[Robin19]

The top left of the screen is Point(0,0). The Cursor.Position.Y will not equal WorkingArea.Height until you reach near the bottom of the screen. Change it to the following (I have not tried this code out).

If Cursor.Position.Y = 0 Then
   Me.WindowState = FormWindowState.Maximized
End If

[curlyfries1999]

No, that didn't work. Thanks for trying.

[CharlieMay]

What about .Top instead of .Height in your original?

Nevermind, I mis-read your code

Try

   Private Sub Form1_Move(sender As Object, e As System.EventArgs) Handles Me.Move
        If Me.Top = Screen.PrimaryScreen.Bounds.Top Then
            Me.WindowState = FormWindowState.Maximized
        End If
    End Sub

I can't test it as Windows 7 has this feature built in.

Actually, I just tested it by displaying a message when my form reached the top and it worked.

This post has been edited by CharlieMay: 10 February 2012 - 11:38 AM

[curlyfries1999]

No. That didn't work either.

[curlyfries1999]

For some reason that compressed everything into one corner. In my program the Windows 7 feature doesn't work.