vB简单运算
来源:百度知道 编辑:UC知道 时间:2024/05/10 07:33:47
在text中输入12,怎么实现1+2=3,如输如78就实现7+8=15,如01就0+1=1~~~~谢谢,小弟菜鸟
如果3位又怎么样,没想到~4位呢?简单讲讲~~谢谢
如果3位又怎么样,没想到~4位呢?简单讲讲~~谢谢
你确定只有2位数吗?
dim a as string
dim b as string
a=left(text1.text,1)
b=right(text1.text,1)
msgbox val(a)+val(b)
这样就多少都行了
dim a as integer
dim i as integer
a=0
for i=1 to len(text1.text)
a=a+mid(text1.text,i,1)
next
msgbox a
dim a as string
dim b as string
a=left(text1.text,1)
b=right(text1.text,1)
msgbox val(a)+val(b)=val(a)+val(b)