How to compare strings with 'LIKE'


like.png
' Gambas class file

' STATIC PUBLIC SUB Main()
'   hForm AS Fmain
'   hForm = NEW Fmain
'   hForm.show
' END

PUBLIC SUB Button1_Click()
  IF Label1.Text LIKE TextBox1.Text THEN
    TextLabel1.Text = TextBox1.Text & " does match !"
  ELSE
    TextLabel1.Text = TextBox1.Text & " does not match !"
  ENDIF
END

-- JochenGeorges - 28 Dec 2004