[VB6] Elenco valori possibili di un parametro di una fuzione

[gibra]

Devi crearti un enumerazione pubblica:

Public Enum eTipo
    eTipo_PRIMO = 1
    eTipo_SECONDO=2
End Enum

Nella funzione poi assegna il parametro l'enumeratore eTipo

Public Sub Test (ByVal param as eTipo)