Help non so proprio come fare!
Sto utilizzando un agente animato della microsoft e al termine di un dialogo vorrei che comparissero nel form due pulsanti, io ho scritto questo:
--------------------
Dim charlie As IAgentCtlCharacter
Const datapath = "Charlie.acs"
Private Sub Form_Load()
Command1.Visible = False
Command2.Visible = False
Agent1.Characters.Load "Charlie", datapath
Set charlie = Agent1.Characters("Charlie")
charlie.LanguageID = &H409
charlie.MoveTo 509, 251
charlie.Show
charlie.Speak "Ciao sono Maria, la tua assistente virtuale"
charlie.Speak "Rispondi alle seguenti domande per configurare il tuo accaunt"
charlie.Speak "Di che sesso sei?"
charlie.Play "Hearing_1"
charlie.Play "Idle1_3"
charlie.Hide
Command1.Visible = True
Command2.Visible = True
End Sub
----------------------------
...naturalmente non funziona perchè i due pulsanti sono sempre visibili anche quando il form è appena caricato!
:master:
Qualcuno può darmi una mano? Il mio problema è che non so come far comparire dei pulsanti, NON a seguito di un evento, ma a seguito di un messaggio che il sistema (nel mio caso l'agente animato) rivolge all'utente!
Vi ringrazio della disponibilità!