其实仔细看两者并没有多大的区别，先看看在vb.net中如何调用：

首先添加一个类模块，来封装此API函数：

[vb] view plain copy  

 

 

1. <span style="font-size:14px;"> Public Declare Function SetParent Lib "<span style="color:#ff0000;">user32</span>" (ByVal hWndChild As Integer, ByVal hWndNewParent As Integer) As Integer</span> 

<span style="font-size:14px;"> Public Declare Function SetParent Lib "<span style="color:#ff0000;">user32</span>" (ByVal hWndChild As Integer, ByVal hWndNewParent As Integer) As Integer</span>

然后在窗体中直接调用即可满足自己想要的需求

[vb] view plain copy  

 

 

1. <span style="font-size:14px;">SetParent(FrmRegisterCard.Handle.ToInt<span style="color:#ff0000;">32</span>, Me.Handle.ToInt<span style="color:#ff0000;">32</span>)</span> 

<span style="font-size:14px;">SetParent(FrmRegisterCard.Handle.ToInt<span style="color:#ff0000;">32</span>, Me.Handle.ToInt<span style="color:#ff0000;">32</span>)</span>

然后把父窗体的windowState属性改为Maximized。

实现的最终效果就是，单击其它得窗体，此窗体会默认最小化到父窗体的左下角，如图：

注：虽然实现了其想要的功能，但自我感觉窗体的大小也要更加子窗体来自我修改一下：

[vb] view plain copy  

 

 

1.      <span style="font-size:14px;">FrmRegisterCard.Width = Me.ClientRectangle.Width - 800 
2. FrmRegisterCard.Height = Me.ClientRectangle.Height - 200 
3. SetParent(FrmRegisterCard.Handle.ToInt32, Me.Handle.ToInt32) 
4. FrmRegisterCard.Show()</span> 

1.  
   <span style="font-size:14px;">FrmRegisterCard.Width = Me.ClientRectangle.Width - 800
2.  
   FrmRegisterCard.Height = Me.ClientRectangle.Height - 200
3.  
   SetParent(FrmRegisterCard.Handle.ToInt32, Me.Handle.ToInt32)
4.  
   FrmRegisterCard.Show()</span>

1、其中最主要的一个区别就是在vb中定义的数据类型是long，而在vb.net中则使用Integer来取代long,因为在vb.net中Integer类型是32位的，和long类型一样。

2、要注意使用ByVal和ByRef

• ByVal是传递值，源数据不会被修改，可以把这个值当做自己的局部变量来使用；（传递参数内存给被调用者）
• ByRef是传递地址，源数据可能被修改。（传递参数地址给被调用者）

3、在主窗体调用API函数的时候要注意“Handel.ToInt32”的使用，他等同于vb调用过程中的.hwnd

H:handle；Wnd:变量对象描述，也就是所谓的窗体，所以Handel.ToInt32也就是所谓的窗口句柄的意思吧！