[VB6] Passaggio di un Enum come parametro opzionale

[ermurena]

Salve a tutti,

vorrei passare un tipo enum come parametro opzionale ad una public function. ho definito in un modulo un tipo enumerato:

Enum tipo
valore1 = 0
valore2 = 1
end

e dichiarato in una funzione un parametro opzionale

public function (...., optional Type as tipo = valore1)

ma quando compilo mi appare questo errore:

Errore di compilazione.
Impossibile utilizzare in moduli oggetto publici tipi Enum privati e tipi Enum definiti in moduli standard o classi private come parametri o tipi restituiti per routine pubbliche, come membri di dati o come campi di tipi pubblici definiti dall'utente


dove sbaglio?

[Boolean]

provando a tradurre in del codice funzionante il tuo esempio, e inserendolo in un Modulo, non riscontro nessun problema.

Enum mioTipo
    valore1 = 0
    valore2 = 1
End Enum

Public Function Esempio(k As Integer, Optional myType As mioTipo = valore1)
Esempio = k
End Function

anche richiamando la funzione da un Form, funziona tutto regolarmente.

Boolean