Как сравнить с коллекцией констант в VB.Net?

Question

У меня есть введенное пользователем значение для проверки на набор зарезервированных номеров для проверки. Набор зарезервированных номеров никогда не изменяется. Таким образом, будучи программистом C в глубине души, я вытащил зарезервированные числа в массив и добрался до своего бластера const.

Const ReservedAddresses() As Byte = {10, 12, 75} 'I wish... 

Однако досадно VS сообщил мне таким образом:

Константы должны быть характеристической или перечислимого типа, а не класс, структура, параметр типа или тип массива.

Каким образом следует правильно содержать набор неизменных чисел, через которые в какой-то момент в будущем можно было бы зацикливать или иным образом проверить против?

Answer 1

Как объясняется в других ответах, Const работает совсем по-другому в .NET и, как правило, не очень полезно.

Вы можете использовать

Private Shared ReadOnly m_ReservedAddresses = {10, 12, 75} 
Public Shared ReadOnly ReservedAddresses As New ReadOnlyCollection(Of Integer)(m_ReservedAddresses) 

Но если честно, я бы, вероятно, просто использовать ReadOnly массив.

Answer 2

Константы должны быть характеристической типа (Boolean, Byte, Date, Decimal, Double, Integer, Long, Object, SByte, Short, Single, String, UInteger, ULong или UShort), или Enum, основанный на одном из интегральных типов. (MSDN)

Почему вместо этого только вместо этого?

Public Shared ReadOnly ReservedAddresses() As Byte = { 10, 12, 75 } 

Update: По Вашему неизменного значения требования, IList будет делать трюк:

Public ReadOnly ReservedAddresses As IList(Of Byte) = New List(Of Byte)() From { 10, 12, 75 }.AsReadOnly() 

... но @answer Конрада чище.

Answer 3

Это сделать довольно много , что вы хотите, только не совсем, как вы хотите это сделать:

Class ReservedAddresses 
    Public Shared ReadOnly A As Int32 = 10 
    Public Shared ReadOnly B As Int32 = 12 
    Public Shared ReadOnly C As Int32 = 75 
End Class 

В нем отсутствует обертку массива, но содержательные названия, казалось бы яснее, чем ReservedAddresses(0).