tip346b.txt

来自「VB大全（精华版）源代码」· 文本 代码 · 共 13 行

Public Enum Weekdays
  Monday = 10
  Tuesday = 20
  Wednesday = 30
  Thursday = 40
  Friday = 50
End Enum

Public Sub Main()
  Debug.Print Monday, Tuesday, Wednesday, Thursday, Friday
End Sub