Как сделать числовой Enum?

[A.A.Z.]

Допустим, чтобы переменная a принимала значения только 0, 1, 2, 3, 4 или 5.

[RayShade]

А так не получится

Код: Выделить всё

public enum myenum
0
1
2
3
4
5
end enum

[A.A.Z.]

не-а
"Недопустимый внутри Enum"

[mad_Max]

А вот так

Код: Выделить всё

Public Enum MyEnum
X0 = 0
X1 = 1
X2 = 2
X3 = 3
X4 = 4
X5 = 5
End Enum

[Vi]

Языковых средств для этого нет. Только самому ручками проверять диапазон.

Т.к. применительно к вышеприведенным Enum

Код: Выделить всё

  Dim x As MyEnum
  x = 6


прекрасно компилится и работает.

[Cyrax]

ну я вам щас понапишу...
----------------------------------

народ вы чего

Код: Выделить всё

Public Enum MyNumbers
  n1 = 1
  n2 = 2
  n3 = 3
  n4 = 4
End Enum

Dim x As MyNumbers

после этого, когда в коде напишешь "x = ", выпадет список возможных значений

[A.A.Z.]

Всем спасибо, работает.