vb 怎么判断储存的一段文字中有某些字
例子如下：
数据库fault_reason_name这个字段储存了 “请查询要打印成绩单的学生”
然后定义了一个变量bx 当变量值得到“打印成绩单”这几个字时
怎么判断fault_reason_name这个字段里面也有这几个字
如果可以的话 还有变量值等于“请查询成绩单”这几个字
然后fault_reason_name字段里也能判断出有这几个字来
谢谢各位帮个忙 十分感谢
第二种中 “请查询” “成绩单” 必须要在一起的 不能分开
like "*xxx*"
instr
len(replace(source, find, "")) <> len(source)
楼上提供的几种方式都可以
不好意思初学者 请详细点好吗 谢谢
source = "请查询要打印成绩单的学生"
if len(replace(source, "打印成绩单", "")) <> len(source) then
msgbox "有"
else
msgbox "没有"
end if
source = "打印成绩单的学生"
if len(replace(source, "打印成绩单", "")) <> len(source) then
msgbox "有"
else
msgbox "没有"
end if
谢谢 caozhy 还有一问题请教下
source = "请查询要打印成绩单的学生"
if len(replace(source, "打印成绩单", "")) <> len(source) then
msgbox "有"
else
msgbox "没有"
end if
还得判断他没有除了“打印成绩
相关问答：
我用Delphi写了一个DLL, DLL里有MDI的子窗体,DLL初始化时 传递调用者的TApplication给DLL, 在Delphi7中调用已经通过,但是不知道在VB中有无TApplication对应类型, 是否能在VB中调用?
你好，用instance不是就可以了&# ......
要用vb打印一条线，长度是100毫米怎么写？
关注
VB code:
Printer.ScaleMode = vbMillimeters
Printer.Line (10, 10)-(110, 10)
Printer.ScaleMode = vbMillimeters
Print ......
Option Explicit
Private Sub Command1_Click()
WebBrowser1.Navigate "http://mc.qeedoo.com/servers.php"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal ......
比如说要在1表中的第三列第二行单元中输入“一二三”一要粗体宋体12号字，二 不要粗体 15号字 三斜体5号字
代码应该怎么打？
LZ指的是个什么表格控件呢，貌似只能设置整个表的字体，或者某几行或几列，没有单独设� ......
