Vb.net 创建值仅在0-3之间的整数参数

Vb.net 创建值仅在0-3之间的整数参数,vb.net,enums,integer,Vb.net,Enums,Integer,我想只使用数字0-3之间的整数的参数,我怎么做 我尝试过使用enum,但它不允许起始数字是这样的整数 Public Enum Octet_Num As Integer 0 1 2 3 End Enum 下面的代码可以工作,但它似乎没有实践一个好的编码标准 Public Enum Octet_Num first_octet second_octet third_octet fourth_octet End Enum Function Get_Oc

我想只使用数字0-3之间的整数的参数,我怎么做

我尝试过使用enum,但它不允许起始数字是这样的整数

Public Enum Octet_Num As Integer
   0
   1
   2
   3
End Enum
下面的代码可以工作,但它似乎没有实践一个好的编码标准

Public Enum Octet_Num
   first_octet
   second_octet
   third_octet
   fourth_octet
End Enum

Function Get_Octet_IPAdd(octet_num As Usage_Get_Octet_IPAdd)

Dim octet As Integer

If octet_num = Octet_Num.first_octet Then
  Octet = 0
End If

If octet_num = Octet_Num.second_octet Then
  Octet = 1
End If

If octet_num = Octet_Num.third_octet Then
  Octet = 2
End If

If octet_num = Octet_Num.fourth_octet Then
  Octet = 3
End If

Dim fourthOctet As String = Format(IPAddress.Parse("192.168.1.130").GetAddressBytes(3), "000")
    Return fourthOctet
End Function

枚举是整数类型,可以用作
中的索引。GetAddressBytes(index)


Enums正是为了这个目的
Public Enum OctetNum
   First = 0
   Second = 1
   Third = 2
   Fourth = 3
End Enum

Function Get_Octet_IPAdd(octet_num As OctetNum)

    Return Format(IPAddress.Parse("192.168.1.130").GetAddressBytes(octet_num), "000")

End Function