Breadcrumbs

[hungryhounduk]

Hi bfh13
Welcome to codenstuff

Code: Select all

Public Class Form1
    'TOP CENTER OF THE SCREEN
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Me.CenterToScreen()
        Me.Top = Screen.PrimaryScreen.Bounds.X
    End Sub
    'LEFT CENTER OF THE SCREEN
    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Me.CenterToScreen()
        Me.Left = Screen.PrimaryScreen.Bounds.Y
    End Sub
    'RIGHT CENTER OF THE SCREEN
    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        Me.CenterToScreen()
        Me.Left = Screen.PrimaryScreen.Bounds.Width - Me.Width
    End Sub
    'BOTTOM CENTER OF THE SCREEN
    Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click
        Me.CenterToScreen()
        Me.Top = Screen.PrimaryScreen.WorkingArea.Height - Me.Height
    End Sub
    'TOP LEFT OF THE SCREEN
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Me.Top = Screen.PrimaryScreen.Bounds.Y
        Me.Left = Screen.PrimaryScreen.Bounds.Y
    End Sub
    'BOTTOM LEFT OF THE SCREEN
    Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
        Me.Top = Screen.PrimaryScreen.WorkingArea.Height - Me.Height
        Me.Left = Screen.PrimaryScreen.Bounds.X
    End Sub
    'TOP RIGHT OF THE SCREEN
    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Me.Top = Screen.PrimaryScreen.Bounds.Y
        Me.Left = Screen.PrimaryScreen.Bounds.Width - Me.Width
    End Sub
    'BOTTOM RIGHT OF THE SCREEN
    Private Sub Button9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button9.Click
        Me.Top = Screen.PrimaryScreen.WorkingArea.Height - Me.Height
        Me.Left = Screen.PrimaryScreen.Bounds.Width - Me.Width
    End Sub
    'CENTER OF THE SCREEN
    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        Me.CenterToScreen()
    End Sub
End Class

These examples above will Position the form or whatever you have as a form where you like

Hope this Helps

regards

Chris

[stiveno]

wahooo; finnaly found it , the tutorial didnt work

[HiNi]

Nice but for giving it more interactive feeling I suggest you to use BubbleBar1.dll for giving a pop-up effect *im just saying* cooll;