split分组后在循环对比
strline="A,B,C,D,E,F,G"
dim a()
a=split(strline,",")
for i=0 to ubound(a)-1
if a(i)=xx then
msgbox aa(i)
exit sub
end if
next
怎么重复提问
dd="A,B,C,D,E,F,G" '把不固定的字符串赋值给dd变量
if InStr(xx,dd)>0 then Exit sub xx若不是字符串那么先转再比较。
参考 *我们与竞争对手最大的区别就是我们知道他们要做什么,而他们不知道我们想做什么。我们想做什么,没有必要让所有人知道。
楼上的,怎么不用strcomp内部函数来进行对比呢???