'ColorConstants’ 的成员：

vbBlack
vbBlue
vbCyan
vbGreen
vbMagenta
vbRed
vbWhite
vbYellow

'Constants’的成员：

vbBack
vbCr
vbCrLf
vbFormFeed
vbLf
vbNewLine
vbNullChar
vbNullString
vb0bjectError
vbTab
vbVerticalTab

'TreeRelationshipConstants’的成员：

tvwChild
tvwFirst
tvwLast
tvwNext
tvwPrevious

'ListSortOrderConstants’的成员：

lvwAscending
lvwAutoLeft
lvwAutomatio
lvwAutoTop
lvwColunnCenter
lvwColumnLeft
lvwColumnRight
lvwDescending
lvwIcon
lvwList
lvwManual
lvwNone
lvwPartial
lvwReport
lvwSmallIcon
lvwSubItem
lvwTag
lvwText
lvwWhole

ext_：

ext cm AfterStartup
ext_cm_CommandLine
ext_cm_External
ext_cm_Startup
ext_dm_HostShutdown
ext_dm_UserClosed

vbext_cm_AfterStartup
vbext_cm_External
vbext_cm_Startup

wbext_ct_ActiveXDesigner
vbext_ct_ClassModule
vbext_ct_Container
vbext_ct_Doc0bject
vbext_ct_Light
vbext_ct_MSForm
vbext_ct_PropPage
vbext_ct_RelatedDocument
vbext_ct_ResFile
vbext_ct_Standard
vbext_ct_StdModule
vbext_ct_UserControl
vbext_ct_VBForm
vbext_ct_VBMDIForm

vbext_cv_FullModuleVi ew
vbext_ov_ProcedureView

vbext_dm_HostShutdown
vbext_dm_MDI
vbext_dm_SDI
vbext_dm_UserClosed

vbext_Friend

vbext_ft_Binary
vbext_ft_Class
vbext_ft_Designers
vbext_ft_Doc0bject
vbext_ft_Exe
vbext_ft_Form
vbext_ft_Frx
vbext_ft_GroupProject
vbext_ft_Module
vbext_ft_Project
vbext_ft_PropertyPage
vbext_ft_Res
vbext_ft_UserControl

vbext_mt_Const
vbext_mt_Event
vbext_mt_Method
vbext_mt_Property
vbext_mt_Variable

vbext_pk_Get
vbext_pk_Let
vbext_pk_Proc
vbext_pk_Set
vbext_Private

vbext_psm_0leServer
vbext_psm_StandAlone

vbext_pt_ActiveXControl
vbext_pt_ActiveXDl1
vbext_pt_ActiveXExe
vbext_pt_StandardExe

vbext_Public
vbext_rk_Project
vbext_rk_TypeLib
vbext_so_None
vbext_so_SubMain

vbext_vm_Break
vbext_vm_Design
vbext_vm_Run

vbext_ws_Maximize
vbext_ws_Minimize
vbext_ws_Normal

vbext_wt_Browser
vbext_wt_CodeWindow
vbext_wt_ColorPalette
vbext_wt_Designer
vbext_wt_Find
vbext_wt_FindReplace
vbext_wt_Immediate
vbext_wt_LinkedWindowFrame
vbext_wt_Locals
vbext_wt_MainWindow
vbext_wt_Preview
vbext_wt_ProjectWindow
vbext_wt_PropertyWindow
vbext_wt_Toolbox
vbext_wt_ToolWindow
vbext_wt_Watch

一个子程序：

Private Function ModuleExt(Modtype As Long) As String
    Select Case Modtype
        Case vbext_ct_StdModule: ModuleExt = ".bas"    '1 standard module.
        Case vbext_ct_ClassModule: ModuleExt = ".cls"    '2 class module.
        Case vbext_ct_MSForm: ModuleExt = ".frm"    '3 form.
        Case vbext_ct_ResFile: ModuleExt = ".res"    '4 standard resource file.
        Case vbext_ct_VBForm: ModuleExt = ".frm"    '5 Visual Basic form.
        Case vbext_ct_VBMDIForm: ModuleExt = ".frm"    '6 The component is an MDI form.
        Case vbext_ct_PropPage: ModuleExt = ".pag"    '7 property page.
        Case vbext_ct_UserControl: ModuleExt = ".ctl"    '8 user control.
        Case vbext_ct_DocObject: ModuleExt = ".dob"    '9 RelatedDocument.
        Case vbext_ct_ActiveXDesigner: ModuleExt = ".dsr"    '11 ActiveX designer.
    End Select
End Function