Access應用程序本身(msaccess.exe)有一些導出函數(shù),是對win32api的再次封裝,比如下面這個選擇顏色對話框調用就很方便。 Private Declare Function wlib_AccChooseColor Lib "msaccess.exe" Alias "WizChooseColor@8" (ByVal hwnd As Long, rgb As Long) As Long Private Sub GetColor() Dim lRgb As Long wlib_AccChooseColor Me.hWnd, lRgb MsgBox "選擇顏色:" lRgb End Sub