Translating Enum string to value

[kejpa]

Hi,

I have a couple of Enums I save as strings (ie, hsNone for Handshaking) when I read back what I've saved I'd like to set the enums to the string value.

 

sSavedValue as string = "hsNone"
ocom.Handshake= sSavedValue

 

How do I do this? Do I have to loop and check if strings match?

 

TIA

/Kejpa

[PlausiblyDamp]

Quick and easy way...

Private Enum Test
   Apple
   Orange
   Lemon
   Pear
End Enum

Private Sub TestMethod()

Dim t As Test
t = System.Enum.Parse(GetType(Test), "Lemon")

MessageBox.Show(t)

End Sub

[kejpa]

Quick and easy way...

That's nice!

With Option Strict turned on you're into some nastier looking code with CType... But I guess it pays off in the end ;)

 

Thanx a bunch!

/Kejpa