Section D.3. Visual Basic Enumerations

D.3 Visual Basic Enumerations

The following is a list of VB enumerations, along with the VB constants that can be used in place of individual enumeration members . In a few cases, there seem to be missing VB intrinsic constants. These are marked with a question mark (?).

Note that all enumeration members must be qualified with the name of the enumeration to which they belong.

D.3.1 AppWinStyle Enumeration

 Enum AppWinStyle     Hide = 0                            ' VbHide     NormalFocus = 1                     ' VbNormalFocus     MinimizedFocus = 2                  ' VbMinimizedFocus     MaximizedFocus = 3                  ' VbMaximizedFocus     NormalNoFocus = 4                   ' VbNormalNoFocus     MinimizedNoFocus = 6                ' VbMinimizedNoFocus End Enum 

D.3.2 CallType Enumeration

 Enum CallType     Method = 1                          ' VbMethod     Get = 2                             ' VbGet     Let = 4                                  Set = 8                             ' VbSet End Enum 

D.3.3 CompareMethod Enumeration

 Enum CompareMethod     Binary = 0                          ' VbBinaryCompare     Text = 1                            ' VbTextCompare End Enum 

D.3.4 DateFormat Enumeration

 Enum DateFormat     GeneralDate = 0                     ' VbGeneralDate     LongDate = 1                        ' VbLongDate     ShortDate = 2                       ' VbShortDate     LongTime = 3                        ' VbLongTime     ShortTime = 4                       ' VbShortTime End Enum 

D.3.5 DateInterval Enumeration

 Enum DateInterval     Year = 0     Quarter = 1     Month = 2     DayOfYear = 3     Day = 4     WeekOfYear = 5     Weekday = 6     Hour = 7     Minute = 8     Second = 9 End Enum 

D.3.6 DueDate Enumeration

 Enum DueDate     EndOfPeriod = 0     BegOfPeriod = 1 End Enum 

D.3.7 FileAttribute Enumeration

 Enum FileAttribute     Normal = 0                          ' VbNormal     ReadOnly = 1                        ' VbReadOnly     Hidden = 2                          ' VbHidden     System = 4                          ' VbSystem     Volume = 8                          ' VbVolume     Directory = 16                      ' VbDirectory     Archive = 32                        ' VbArchive End Enum 

D.3.8 FirstDayOfWeek Enumeration

 Enum FirstDayOfWeek     System = 0                          ' VbUseSystemDayOfWeek     Sunday = 1                          ' VbSunday     Monday = 2                          ' VbMonday     Tuesday = 3                         ' VbTuesday     Wednesday = 4                       ' VbWednesday     Thursday = 5                        ' VbThursday     Friday = 6                          ' VbFriday     Saturday = 7                        ' VbSaturday End Enum 

D.3.9 FirstWeekOfYear Enumeration

 Enum FirstWeekOfYear     System = 0                          ' VbUseSystem     Jan1 = 1                            ' VbFirstJan1     FirstFourDays = 2                   ' VbFirstFourDays     FirstFullWeek = 3                   ' VbFirstFullWeek End Enum 

D.3.10 MsgBoxResult Enumeration

 Enum MsgBoxResult     OK = 1                              ' vbOK     Cancel = 2                          ' vbCancel     Abort = 3                           ' vbAbort     Retry = 4                           ' vbRetry     Ignore = 5                          ' vbIgnore     Yes = 6                             ' vbYes     No = 7                              ' vbNo End Enum 

D.3.11 MsgBoxStyle Enumeration

 Enum MsgBoxStyle     DefaultButton1 = &H00000000         ' vbDefaultButton1     ApplicationModal = &H00000000       ' vbApplicationModal     OKOnly = &H00000000                 ' vbOKOnly     OKCancel = &H00000001               ' vbOKCancel     AbortRetryIgnore = &H00000002       ' vbAbortRetryIgnore     YesNoCancel = &H00000003            ' vbYesNoCancel     YesNo = &H00000004                  ' vbYesNo     RetryCancel = &H00000005            ' vbRetryCancel     Critical = &H00000010               ' vbCritical     Question = &H00000020               ' vbQuestion     Exclamation = &H00000030            ' vbExclamation     Information = &H00000040            ' vbInformation     DefaultButton2 = &H00000100         ' vbDefaultButton2     DefaultButton3 = &H00000200         ' vbDefaultButton3     SystemModal = &H00001000            ' vbSystemModal     MsgBoxHelp = &H00004000             ' vbMsgBoxHelp     MsgBoxSetForeground = &H00010000    ' vbMsgBoxSetForeground     MsgBoxRight = &H00080000            ' vbMsgBoxRight     MsgBoxRtlReading = &H00100000       ' vbMsgBoxRtlReading End Enum 

D.3.12 OpenAccess Enumeration

 Enum OpenAccess     Default = &HFFFFFFFF     Read = 1     Write = 2     ReadWrite = 3 End Enum 

D.3.13 OpenMode Enumeration

 Enum OpenMode     Input = 1     Output = 2     Random = 4     Append = 8     Binary = 32 End Enum 

D.3.14 OpenModeTypes Enumeration

 Enum OpenModeTypes     Any = &HFFFFFFFF     Input = 1     Output = 2     Random = 4     Append = 8     Binary = 32 End Enum 

D.3.15 OpenShare Enumeration

 Enum OpenShare     Default = &HFFFFFFFF     LockReadWrite = 0     LockWrite = 1     LockRead = 2     Shared = 3 End Enum 

D.3.16 TriState Enumeration

 Enum TriState     UseDefault = &HFFFFFFFE             ' VbUseDefault     False = 0                           ' VbFalse     True = 1                            ' VbTrue End Enum 

D.3.17 VariantType Enumeration

 Enum VariantType     Empty = 0                                Null = 1                                 Short = 2                                Integer = 3                         ' VbInteger     Single = 4                          ' VbSingle     Double = 5                          ' VbDouble     Currency = 6                        ' VbCurrency     Date = 7                            ' VbDate     String = 8                          ' VbString     Object = 9                          ' VbObject     Error = 10                          ' VbError     Boolean = 11                        ' VbBoolean     Variant = 12                        ' VbVariant     DataObject = 13                     ' VbDataObject     Decimal = 14                        ' VbDecimal     Byte = 17                           ' VbByte     Char = 18                                Long = 20                           ' VbLong     UserDefinedType = 36                ' VbUserDefinedType     Array = 8192                        ' VbArray End Enum 

D.3.18 VbStrConv Enumeration

 Enum VbStrConv     None = 0                                 UpperCase = 1                       ' VbUpperCase     LowerCase = 2                       ' VbLowerCase     ProperCase = 3                      ' VbProperCase     Wide = 4                            ' VbWide     Narrow = 8                          ' VbNarrow     Katakana = 16                       ' VbKatakana     Hiragana = 32                       ' VbHiragana     SimplifiedChinese = 256             ' VbSimplifiedChinese     TraditionalChinese = 512            ' VbTraditionalChinese     LinguisticCasing = 1024             ' VbLinguisticCasing End Enum