level 2
大家看看以下代码Dim find, address As Stringfind = InputBox("请输入要查找的字符串")address = InStr(Text1.text, find)If address ThenText1.SelStart = address - 1Text1.SelLength = Len(find)ElseMsgBox "没找到"End If为什么找到后不会选中所查找的字符呀(以前看做记事本的教程也是,查找字符串都无法选中,这是为什么呀...)恳请赐教...
2006年01月29日 16点01分
1
level 0
很简单，因为缺少一句text1.setfocus注意要放在Text1.SelStart = address - 1 Text1.SelLength = Len(find)之前！
2006年01月29日 16点01分
2
level 13
如2F所说的没有 setfocus 当然得不到焦点.还有楼主要特别注意的一点就是你的变量"取名", 电脑很笨也很敏感,你所用的两个变量名称 address 与 Find 都是电脑系统与VB内定的字眼, 你用addressb 或 findb 都可以,但绝不要用一些保留字眼当变量名称.
2006年01月29日 16点01分
3
level 1
address 和 find 不是 vb 的保留字。。写小程序可以用的
2006年01月30日 09点01分
4