很简单，用字符串查找函数就可以实现了。
创新互联建站主要从事成都网站制作、成都网站设计、网页设计、企业做网站、公司建网站等业务。立足成都服务长沙县,10年网站建设经验,价格优惠、服务专业,欢迎来电咨询建站服务:18982081108
当在StrB查找到StrA字符串时，返回肯定是非0的数，值就是True，找不到为0或者-1，值就是Flase
比如：
Dim StrA As String = "Time is Limited"
Dim StrB As String = "Time"
Dim Stu As Boolean= InStr(StrA, StrB)
这运行段代码，Stu值就是True了。
我觉得这样最简单有效。
vb:
instr()函数可以直接判断。
vb.net可以用
string.intertext来判断。
就一个函数，不存在什么代码问题。
字符串中指定文字位置查询,如:instr("inter"，"er")
返回待判断字符串在原字符串中第一次出现的位置，如果不包含的话返回0
