Question

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

我尝试过使用枚举，但它不允许起始编号是这样的整数

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

Answer 1

枚举是整数类型，可以在.GetAddressBytes(index)

中用作索引

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

创建一个整数参数，其值仅为0 - 3

1 个答案: