potresti usare una enumerazione,
Private Enum playing=0, stopped=1, paused=2, unknown=3
che può essere scritta anche:
Public | Private Enum playing, stopped, paused, unknown
potrai quindi usare l'equivalente letterario per indicare il numero.
http://gambaswiki.org/wiki/cat/enumdecl (http://gambaswiki.org/wiki/cat/enumdecl)
...oltre all'ottimo suggerimento di sotema, potremmo anche pensare ad una soluzione (seppure meno breve e sintetica rispetto a quella dell'Enumerazione) mediante una Struttura: ;D
Public Struct Status_S
playing as Byte
stopped As Byte
paused As Byte
unknown As Byte
End Struct
Public Sub Main()
Dim status As New Status_S
' Assegnamo a ciascun membro della variabile del tipo della nostra Struttura il proprio valore:
With status
.playing = 0
.stopped = 1
.paused = 2
.unknown = 3
End With
... etc
' Effettuiamo una veloce verifica ad esempio sul 3° membro:
Print status.paused
End