Question

请教一个问题 如何判断text1.text中是否含有关键字

比如:输入"你好啊"如何判断"你好啊"中是否含有关键字"你好"?谢谢

Answer 1

text1="你好啊" '输入的总字符
s="你好" '要查找的字符
x=instr(text1,s)'查找函数
if x=0 then msgbox"没找到" '返回0为没有这个关键字
if x>0 then msgbox"找到" '非0为找到,并所得的值为text1中出现的位置,如此时x=1

Answer 2

先用STREAMREADER读入文本 然后转为字符串 再用字符串查找

Answer 3

If InStr("你好啊", "你好") Then
MsgBox "找到"
Else
MsgBox "没找到"
End If

在要text1.text中找就换成If InStr(text1.text, "你好") Then......

Answer 4

if instr(1,text1.text,"你好")<>0 then
msgbox("有你好")
then