dim a as stringdim b as stringdim c as singledim d as singledim e as singlec=val(a)d=val(b)e=c+de'文本=str$(e)
输进a和b不就行了吗?
a=trim(me.txt1.text)b=trim(me.txt2.text)c=val(a)d=val(b)e=c+dme.txt3.text=str$(e)