-----------------------------------------------------------
New Message on BDOTNET
-----------------------------------------------------------
From: NetPointer
Message 4 in Discussion
Spaces are not possible...but you can use ToString method of the enum member...
Following will msgbox "2" when u give input of "two"
Public Enum mylist
one
two
three
End Enum
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles Button1.Click
Dim sstr As String = InputBox("insert")
Select Case sstr
Case mylist.one.ToString
MsgBox("1")
Case mylist.two.ToString
MsgBox("2")
Case mylist.three.ToString
MsgBox("3")
End Select
End Sub
-----------------------------------------------------------
To stop getting this e-mail, or change how often it arrives, go to your E-mail
Settings.
http://groups.msn.com/BDotNet/_emailsettings.msnw
Need help? If you've forgotten your password, please go to Passport Member Services.
http://groups.msn.com/_passportredir.msnw?ppmprop=help
For other questions or feedback, go to our Contact Us page.
http://groups.msn.com/contact
If you do not want to receive future e-mail from this MSN group, or if you received
this message by mistake, please click the "Remove" link below. On the pre-addressed
e-mail message that opens, simply click "Send". Your e-mail address will be deleted
from this group's mailing list.
mailto:[EMAIL PROTECTED]
