VB.net Express 2010 eval？

Question

這種情況是這樣的： 我想使用組合框設置formborderstyle。

我可以用這些方法爲 「無」 成功設置邊框：

Form1.FormBorderStyle = 0 

或者

Form1.FormBorderStyle = Windows.Forms.FormBorderStyle.None 

---

我怎麼能這樣用繩子？

Dim formstyle As String 
formstyle = "Windows.Forms.FormBorderStyle." & ComboBox1.Text 
Form1.FormBorderStyle = formstyle 

我得到這個錯誤：從字符串「Windows.Forms.FormBorderStyle.No」 轉換到類型「整數」是無效的。

---

看起來好像Form1.formborderstyle只取整數。沒有實際使用整數，是否有一種方法可以將字符串轉換爲整數對應...有點像eval？

最後，我希望它看起來是這樣的：

Dim formstyle As String 
formstyle = "Windows.Forms.FormBorderStyle." & ComboBox1.Text 
Form1.FormBorderStyle = eval(formstyle) 

Answer 1

使用Enum.(Try)Parse：

Enum.Parse

Converts the string representation of the name or numeric value of one or more enumerated constants to an equivalent enumerated object.

的文件和this answer有語法的一個例子。你很可能是這樣的：

Form1.FormBorderStyle = CType([Enum].Parse(GetType(FormBorderStyle), ComboBox1.Text), FormBorderStyle)