此處為VisualFreeBasic編程教程(從零開始學或VB進階)的子章節部分，全部目錄點鏈接。

在VB6里，很多高階應用，就用到子類化，在VFB的世界里，子類化幾乎不需要

因為所有的消息都自己操控，就和VB6子類化一樣，VB6是為了和VB6搶要控制權

才去子類化，而VFB的控制權都在自己手里。

Function FORM1_CUSTOM ( _
                      hWndForm      As HWnd, _      ' 窗體句柄
                      wMsg          As UInteger,  _  ' 消息類型
                      wParam        As wParam, _    ' 第一個消息參數
                      lParam        As lParam   _   ' 第二個消息參數
                      ) As Long
                      
每個窗口和控件都有自定義事件，這就是VB6里的子類化

   Function = 0   ' 根據你的需要改變
End Function

還有，VFB給你提供了更強的控制權

所有的窗口和消息（指你自己寫的軟件），全部經過在這里，可以由你任意控制

有時候，我就是要用子類化，那么也簡單，用VB6的方法即可

下面我要說的是，32位和64位通用子類化（VB6只能用在32位軟件）

GetWindowLongPtr(HWND, GWLP_WNDPROC)  獲取子類地址
SetWindowLongPtr(HWND, GWLP_WNDPROC,新地址)

以上2個函數是隨著64位系統出來而出的，現在寫，你必須用這個。