Dim frm As New Form
frm.StartPosition = FormStartPosition.Manual '这个很重要,必须设置为Manual,Location才能有用
Dim StartPoint As New System.Drawing.Point
StartPoint.X = System.Windows.Forms.SystemInformation.PrimaryMonitorSize.Width - frm.Width
StartPoint.Y = System.Windows.Forms.SystemInformation.PrimaryMonitorSize.Height - frm.Height
frm.Location = StartPoint
frm.Show()