In VB.Net, I typically create Enums like so:
Private Enum Zone IsNegative = -3 IsBad = -2 IsError = -1 Undefined = 0 \' or Unknown, Nothing... Value