用VB编写一个程序，三个数比较大小的问题

x,y,z
if x>y then
t=x
x=y
y=t
end if
if x>z then
t=x
x=z
z=t
end if
if y>z then
t=y
y=z
z=t
end if
pring x,y,z

你们的代码都属于新手看不懂的 呵呵 我给你写了一个比较容易懂的！ 先和你说一下原理
首先我弄了4个输入框控件（text） 一个按钮 输入框1 在代码中为 A ， 输入框2 为B，3为C， 4为D ！ 前三个 是比大小的输入数 输入框4也就是D 为显示最大数的！ 原理为：
a和B先对比 如果A大于B 然后 D等于A （输入框现实的是最大A！） 否则显示最大B
再用C和D对比（由于D已经等于了A或B的值！所以就拿D和C对比了）如果C大 然后D等于C
如果C小 不做反应！也就是没有否则！下面是代码：
Private Sub Command1_Click()
Dim a, b, c, d As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
d = Val(Text4.Text)
If a > b Then
Text4.Text = a
Else
Text4.Text = b
End If
If c > d Then
Text4.Text = c
End If
End Sub
废话有点多，其实我可以不说原理的 只是怕新手看不懂的 呵呵 ！！

相信楼主也会一些基本的操作了，好，我简要地说一下步骤，同时给出代码：
1、新建一个工程，窗体form1上新建三个文本框，一个按钮
2、在代码窗口输入如下代码（直接复制粘贴即可）：

Private Sub Command1_Cli