Search Tools Links Login

Enumeration Spelling


Visual Basic 6, or VB Classic

How to keep the upper/lower case of Enumeration members

Original Author: Ulli

Code

Option Explicit
'Due to a bug in VB members of an Enumeration do
'not keep their upper/lower case when they are
'typed differently in code. There is a simple
'solution however. All you have to do is repeat
'the'member names with their proper spelling and
'case bracketed by
#If False Then
#End If
'as the following example shows:
Public Enum TTStyle
  TTStandardIfActive = TTS_STANDARD
  TTBalloonIfActive = TS_BALLOON
  TTStandardAlways = TTS_STANDARD Or TTS_ALWAYSTIP
  TTBalloonAlways = TTS_BALLOON Or TTS_ALWAYSTIP
  TTNone = -1
End Enum
#If False Then
Private TTStandardIfActive, TTBalloonIfActive, TTStandardAlways, TTBalloonAlways, TTNone 'to preserve the case
#End If

About this post

Posted: 2003-06-01
By: ArchiveBot
Viewed: 106 times

Categories

Visual Basic 6

Attachments

No attachments for this post


Loading Comments ...

Comments

No comments have been added for this post.

You must be logged in to make a comment.