Как сравнивать строки с помощью '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