data.bas

来自「很好！ 很实用！ 免费！」· BAS 代码 · 共 22 行

Attribute VB_Name = "Data"
Option Explicit
'*************************************************
Public Enum vbBusy
    '修改此处请修改clsContrils类,因为有历史问题
    '**********************For g_Busy
    vbBusyCartoon = 31
    vbBusySchedule = 32
End Enum
Public Enum vbListTreeView
    '**********************For ListTreeView
    vbListTreeViewArea = 1
End Enum
Public Enum vbOpenFile
    vbSW_normal = 1
    vbSW_maximize = 3
    vbSW_minimize = 6
    vbSW_show = 5
End Enum

Public Const vbNullGUID = "{00000000-0000-0000-0000-000000000000}"