1Imports System
2Imports System.Collections
3Imports System.Reflection
4
5Namespace Enum5
6    Class Test
7        Shared Function Main() As Integer
8            Dim e As en
9            Dim o As String
10            o = t(e.ToString())
11            Return o.Length - 8
12        End Function
13
14        Shared Function T(ByVal ParamArray P() As String) As String
15            Return p(0)
16        End Function
17    End Class
18    Enum En
19        value222
20    End Enum
21
22End Namespace