Keskustelu: Ohjelmointikysymykset: VB6: Jos tekstikenttä sisältää sanan

Joops eli miten sais sillä tavalla että jos teksti laatikko on täynnä tekstiä mutta jos text1_changessa se havaitsee tietyn sanan teksti laatikossa niin ohjelma tekee jotain

Tee vaikka näin:

Private Sub Text1_Change()
    If InStr(Text1, "testi") > 0 Then
        MsgBox "!"
    End If
End Sub

Jos tekstilaatikon tekstin osana on sana "testi", tulee viesti-ikkuna.