1. 程式人生 > >Vb.net/VB 聲明API函數實現父窗口功能

Vb.net/VB 聲明API函數實現父窗口功能

數據類型 機房收費 card hand 一個 繼續 學習 nts course

回想第一次敲機房收費。自己調用了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函數實現父窗口功能