磷酸盐缓冲液的配置表:怎样用VB制作类似于记事本里的查找对话框?

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/29 12:13:47
最近我编一款软件,查找成了大问题。
我试了InputBox和RichTextBox.Find,都不好用,那位大虾能帮帮我?
能否贴上思路和源代码?

你可以自己做一个form1,在上面绘出text1用来输入关键字,还有别的按扭等控件。然后用下面语句查找:
dim i as long
i=instr(RichTextBox.text,text1.text)
RichTextBox.selstart=i
RichTextBox.sellength=len(text1.text)

'这样就可以让RichTextBox自动选中要查找的关键字了。

好办法,同意,同时要注意大小写,INSTR函数是区分大小写的,在找的时候用ucase函数全部转成大写或者小写,
例如:
i=instr(ucase(RichTextBox.text),ucase(text1.text))

这样大写小写都能找