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相关文章