VBA instr 函数
sub demo() dim x as integer x = instr (1, "abcedfg","f") '从第一个位置开始查找"f"在"abcdefg"中位置,此时返回6 if instr(1, "abcedfg","f") then '如果条件为真,则执行以下语句
sub demo() dim x as integer x = instr (1, "abcedfg","f") '从第一个位置开始查找"f"在"abcdefg"中位置,此时返回6 if instr(1, "abcedfg","f") then '如果条件为真,则执行以下语句