下面的代码示例设置窗体的大小和位置,使窗体位于距桌面左边框 50 个像素、距桌面顶部 50 个像素的位置。
Dim tempRect As New Rectangle(50, 50, 100, 100)
Me.DesktopBounds = tempRect
下面的代码示例设置窗体的大小和位置,使窗体位于距桌面左边框 50 个像素、距桌面顶部 50 个像素的位置。
Dim tempRect As New Rectangle(50, 50, 100, 100)
Me.DesktopBounds = tempRect
转载于:https://www.cnblogs.com/ligang/archive/2008/10/30/1323165.html