Italian Errore con CallSubDelayed2

' Classe clsMiaClasse
Sub Class_Globals
   Private mCallback As Object
   Private mEvent As String
End Sub

'Initializes the object. You can add parameters to this method if needed.
Public Sub Initialize(Callback As Object, Event As String)
   mCallback = Callback
   mEvent = Event
End Sub


Public Sub ChiamaRoutine(NomeRoutine As String, Dato As String)
   CallSubDelayed2(mCallback, mEvent & "_" & NomeRoutine, Dato)
End Sub

' Activity - ma potrebbe anche essere un'altra classe, ad esempio
' - da qualche parte - Activity_Create, per esempio
Private objMiaClasse As clsMiaClasse
objMiaClasse.Initialize(Me, "OggMiaClasse")
objMiaClasse.ChiamaRoutine("Leggi", "Dato di prova")


Sub OggMiaClasse_Leggi(Risposta As String)
   Log(Risposta)
End Sub