Data Type VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Data Type
  4. Working with Enumerated Types
'
Public Enum PersonTypeList
    Client
    PersonalContact
    Vendor
    Other
End Enum
Sub EnumM()
   Dim pt As PersonTypeList
   pt = Client
   
   Debug.Print pt
End Sub