Dim names() As String = CType([Enum].GetNames(GetType(GPRMCState)), String())
For Each Name1 In names
Console.WriteLine("{0,3:D} 0x{0:X} {1}", [Enum].Parse(GetType(GPRMCState), Name1), Name1)
Next
For Each Name1 In names
Console.WriteLine("{0,3:D} 0x{0:X} {1}", [Enum].Parse(GetType(GPRMCState), Name1), Name1)
Next
469

被折叠的 条评论
为什么被折叠?



