Visual Basic 6 - parola chiave

passato..

perfetto...benvenuto tra noi allora!!!
edit: fine (ufficialmente)

uhm... purtroppo non va...

riprendo l'esempio del cavolo...

if txtcmd.text="cavolo" then
txtrobot.text="Un cavolo? ti piacciono?"
end if

non dovrebbe fare così? però per farlo ha bisogno di sapere quali parole controllare...non so se mi spiego...

fede, questo lo so fare uff... è difficile da spiegare... non è che potremmo parlarne via mail o se hai msn o skype? grazie

non hai letto la firma di Fr3d3R!K?... solo qui sul forum!!!

[b]Option Explicit
Dim parola As String
Dim lettera As String
Dim x As Integer[/b]

Private Sub cmd_click()
[b]Txtcmd.Text = ""[/b]
For x = 1 To Len([b]Txtcmd[/b].Text)
lettera = Mid(Txtcmd.Text, x, 1)
If Not lettera = " " Then
parola = parola & lettera
Else
Call leggiparola
parola = ""
End If
Next x
Call leggiparola
[b]parola = ""[/b]
End Sub

Private Sub leggiparola()
If parola = "grazie" Then
Txtrobot.Text = Txtrobot.Text & "prego"
ElseIf parola = "blabla" Then
Txtrobot.Text = Txtrobot.Text & "blabla cosa?"
End If
End Sub

mancava la dichhiarazione delle variabili, la cancellazione del testo in txtrobot e lo svuotamento delle parole nella variabile parola.
Beh l'avevo scritta "al volo" vb mi da delle grane

avevo dichiarato anche io le variabili.. ma mi ero dimenticato x ^^ grazie paperoga, sei stato molto gentile e paziente cn me