作业帮 > 综合 > 作业

VB程序设计题:任意三个数ABC,将其按由大到小的顺序显示出来

来源:学生作业帮 编辑:搜狗做题网作业帮 分类:综合作业 时间:2024/05/14 06:48:35
VB程序设计题:任意三个数ABC,将其按由大到小的顺序显示出来
VB程序设计题:任意三个数ABC,将其按由大到小的顺序显示出来
假设要比较的三个数输入在Text1,text2,text3,结果放在text4
Private Sub Command1_Click()
Dim a,b,c,d As Double
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
If a < b Then d = a:a = b:b = d
If b < c Then d = b:b = c:c = d
If a < b Then d = a:a = b:b = d
Text4.Text = a & " ," & b & " ," & c
End Su