首页 > 代码库 > Vb.net/VB 声明API函数实现父窗口功能

Vb.net/VB 声明API函数实现父窗口功能

     回想第一次敲机房收费。自己调用了api函数实现了父窗口及其子窗口最小化的功能。现在再次遇到,自己就在思考,能不能继续使用API函数呢?答案当然是Of Course!

事实上细致看两者并没有多大的差别。先看看在vb.net中怎样调用:

首先加入一个类模块,来封装此API函数:

<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;">SetParent(FrmRegisterCard.Handle.ToInt<span style="color:#ff0000;">32</span>, Me.Handle.ToInt<span style="color:#ff0000;">32</span>)</span>

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

实现的终于效果就是,单击其他得窗口,此窗口会默认最小化到父窗口的左下角,如图:

技术分享

注:尽管实现了其想要的功能,但自我感觉窗口的大小也要更加子窗口来自我改动一下:

             <span style="font-size:14px;">FrmRegisterCard.Width = Me.ClientRectangle.Width - 800
        FrmRegisterCard.Height = Me.ClientRectangle.Height - 200
        SetParent(FrmRegisterCard.Handle.ToInt32, Me.Handle.ToInt32)
        FrmRegisterCard.Show()</span>
下边来谈谈与VB的API函数声明的差别:

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也就是所谓的窗口句柄的意思吧。


在此也仅仅是自己的理解。先把对API的理解放到这里,为再次学习打个基础吧。

Vb.net/VB 声明API函数实现父窗口功能