关于VB中的查找

来源：百度知道编辑：UC知道时间：2024/06/11 08:01:27

我想做一个查找相关字符的程序
会的高手帮帮我
要求如下：
1：在数组中存放着王小姐李先生王先生谢小姐 N个数据
2：在TEXT1中输入 “王” 点击按钮
3：在TEXT2中输出王小姐王先生
同理：输入 “小姐”
输出王小姐谢小姐
会的帮帮忙谢谢了我的 Q 592944053

假设数据存放在数组A()中，用以下代码可以：
text2.text=""
for i=lbound(a) to ubound(a)
if instr(a(i),text1.text)<>0 then
text2.text=text2.text+a(i)+" "
end if
next i

dim a()
dim i as integer
a=array("给数组赋值,,本人省略")
for i=lbound(a) to ubound(a)
if instr(a(i),text1)<>0 then text2=text2 & a(i) & " "
next

你没有讲明白，是从字符串中查找还是从字段中查找，从字符串中查找，直接用命令就可以，如果从字段中查找，用select的like模糊查找就可以了

Asc 函数代表字符串中首字母的字符代返回一个 Integer 可以用来作比较

或者也可以用InStr 函数可以查询某个字符出现在某个字符串的哪个位置相关查询MSDN

正则式，不会