2020年7月13日 星期一

vb.net 表單移到最右邊 [Move Form to left]


1
2
3
4
5
6
    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim ScrnSize As Size = My.Computer.Screen.Bounds.Size
        Me.Top = 30
        Me.Left = ScrnSize.Width - Me.Width

    End Sub

沒有留言:

張貼留言