Question

在Text1输入整数a、Text2输入整数b，判断a和b的大小，并把较大的数在Text3文本框中输出。

麻烦编下代码。我自己编的不行……晕。

Answer 1

在比较按钮事件中写
dim a,b as integer
a=cint(text1.text)
b=cint(text2.text)
if a>b then
text3.text=a
elseif a<b then
text3.text=b
elseif a=b then
msgbox"两个数一样大！"
end if

追问

我写的大致就是这样，可是结尾好像不行。

追答

怎么可能……这么简单的玩意，我自个儿运行一点问题没有

追问

就是程序输进去以后试运行，答案出不来。很苦恼啊明天早上就考试了呢……

Answer 2

dim a as integer
dim b as integer
a=val(text1.text)
b=val(text2.text)
if a>b then
text3.text=a
else if a<b then
text3.text=b
else
msgbox"两个数一样大！"
end if

追问

我问同学，她是这样写：
dim a as integer
dim b as integer
a=val(text1.text)
b=val(text2.text)
if a>b then
text3.text=a
else
text3.text=b
end if
可是我套进去不能运行啊……