如何调整其它窗体的大小和位置？！！！

Question

如何调整其它窗体的大小和位置？！！！不是让它最大化或最小化，而是任意调整大小，还有位置

Answer 1

.left
.top
.width
.height

Answer 2

是调整别的程序的窗体！不是本身的，只能用api

Answer 3

先用FINDWINDOW取得窗口的句柄,再用MoveWindow函数移动窗口的位置~~

Answer 4

form2.width
form2.height
....

Answer 5

cuizm(射天狼) 
能否详细说说

Answer 6

Option ExplicitPrivate Declare Function MoveWindow Lib "user32" (ByVal hwnd As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal bRepaint As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As LongPrivate Sub Command1_Click()
    Dim hwd As Long
    
    hwd = FindWindow(vbNullString, "TextPad") '把第二个参数换成你要移动窗口的标题就行了~~
    MoveWindow hwd, 100, 100, 200, 200, True
End Sub

Answer 7

用FindWindow，条件是窗口标题唯一，MSDN中有GetWindow,getwindowText等都可以用，setwindowpos,setwindowrgn等，可用的还不少