API实现让子窗体脱离父窗体,实现对立窗口
API实现让子窗体脱离父窗体,实现对立窗口
[解决办法]
'新建一个工程,添加一个MDI窗体,设置Form1为MDI自窗体,在其内添加一个Command1,键入如下代码Option ExplicitPrivate Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As LongPrivate Sub Command1_Click() Dim lngP As Long lngP = SetParent(Me.hWnd, ByVal 0&) Command1.Caption = lngPEnd Sub