private sub commad1_click()
dim a,b,c as istring
if a>b then
text4.text=a
else
text4.text=b
elseif
a>c
text4.text=a
else
text4.text=c
。。。。
。。。。。
。。。。(省略)
endif
endsub
废话不多说了
你问的问题嘛。 text4.text=a 可以实现,但前提是定义A变量是字符值。如果是输入的字符串的话 需要引号。
text4=结果
直接赋值.
你是想多行显示的话:text4 的 MultiLine 属性设置为 true