UC知道一个关于VB的简单问题
来源：百度知道 编辑：UC知道 时间：2024/05/16 17:11:22
请问如何判断一个文本框里是是否包含了某些内容
比如我要判断TEXT1.TEXT有没有包含"+"
如何提取文本框里的内容
比如文本框里的内容是1+1我如何用一个变量提取加字前面的1和后面的1
我试了
用 msgbox instr(text1.text,"+") 只能输出0和1 如果text1.text的内容是+就输出1.其他的就输出0,而且包含+的其他也输出0
我要的是包含+就判断是啊
我又用
IF msgbox instr(text1.text,"+") then
print "+"
end if
可是也是如果text1.text的内容是+就输出.其他的就不输出,而且包含+的其他也不输出
比如我要判断TEXT1.TEXT有没有包含"+"
如何提取文本框里的内容
比如文本框里的内容是1+1我如何用一个变量提取加字前面的1和后面的1
我试了
用 msgbox instr(text1.text,"+") 只能输出0和1 如果text1.text的内容是+就输出1.其他的就输出0,而且包含+的其他也输出0
我要的是包含+就判断是啊
我又用
IF msgbox instr(text1.text,"+") then
print "+"
end if
可是也是如果text1.text的内容是+就输出.其他的就不输出,而且包含+的其他也不输出
执行下边的命令看看你就明白了
msgbox instr(text1.text,"+")
如果是1+1那就要进行拆分
text1.text="1+1"
dim sp()
sp=split(text1.text,"+")
'拆分成数组sp(0)=1,sp(1)=1
redim sp(ubound(sp())
'重新定义上限，也可以不定义
补充
按照你的要求
请问如何判断一个文本框里是是否包含了某些内容
比如我要判断TEXT1.TEXT有没有包含"+"
判断text1.text包含"+"
if instr(text1.text,"+")<>0 then
....包含
end if
如何提取文本框里的内容
比如文本框里的内容是1+1我如何用一个变量提取加字前面的1和后面的1
dim sp()
sp=split(text1.text,"+")
分割后
sp(0)="1"'+前边的1
sp(1)="1"'+后边的1
处理字符串当然少不了Mid$这个函数啦
Mid 函数
返回 Variant (String)，其中包含字符串中指定数量的字符。
语法
Mid(string, start[, length])
Mid 函数的语法具有下面的命名参数：
部分 说明
string 必要参数。字符串表达式，从中返回字符。如果 string 包含 Null，将返回 Null。
start 必要参数。为 Long。string 中被取出部分的字符位置。如果 start 超过 string 的字符数，Mid 返回零长度字符串 ("