展开全部
可以的,而且非常简单:
Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Sub MDIForm_Load()
SetParent FindWindow(vbNullString, "无标题 - 记事本"), MDIForm1.hWnd
End Sub
这是在MDI主窗体启动时就把记事本“抓获”作为自己的子窗体。
注意,运行之前要先打开一个空白的记事本
补充说明:其配答实不但是MDI窗体,就是普通窗体,也可以把其他窗体作为自己的子窗体的。SetParent这个API函数的作用,就是给某个窗体重新找一个“父亲”,因此,理论上利用这个函数既可以把别的窗体作为自己的子窗体,也可以把自己作为仔卖滚其他窗体的子窗体,还可以把某个窗体作为另一个第三方窗体的子窗体,利用得好的话会念余很有意思的。
Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Sub MDIForm_Load()
SetParent FindWindow(vbNullString, "无标题 - 记事本"), MDIForm1.hWnd
End Sub
这是在MDI主窗体启动时就把记事本“抓获”作为自己的子窗体。
注意,运行之前要先打开一个空白的记事本
补充说明:其配答实不但是MDI窗体,就是普通窗体,也可以把其他窗体作为自己的子窗体的。SetParent这个API函数的作用,就是给某个窗体重新找一个“父亲”,因此,理论上利用这个函数既可以把别的窗体作为自己的子窗体,也可以把自己作为仔卖滚其他窗体的子窗体,还可以把某个窗体作为另一个第三方窗体的子窗体,利用得好的话会念余很有意思的。
追问
对了,vb.net的怎么弄啊
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询