谢谢!
解决方案 »
- 如何控制VB中某一列中只能输入0到45的数字?
- 关于VB6.0的LICENSE
- 安装程序出错,安装程序无法创建以下文件夹%commfiles\microsoft shared\ADO
- SSTab控件不会用了,请高手指点
- shell()函数的一个高级点的问题,我看了一下,别人没问过。请高手指点。谢谢!
- 各位现在做VB的人怎么越来越少了?
- visual basic 的变量作用域有有三个 ----局部、窗体、公有
- 请问如何获得拨号上网的ip地址,而不是本地网卡的ip地址。
- 如何使用DataGrid,HFGrid等Vb基本表格控件?问题不算难!
- 用dao如何实现综合查询?
- 请问vb里面有什么方法可以进行全屏输出的?
- 求助一个小算法
用InStr([start, ]string1, string2[, compare])函数
Dim s As String, i As Long
Open "C:\aa.txt" For Input As #1
s = StrConv(InputB(LOF(1), #1), vbUnicode)
Close #1
i = InStr(s, "aaa")
MsgBox i
End Sub