作业帮 > 综合 > 作业

,注意是vb程序.不是c语言.各位大虾快救命.

来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/07/25 05:31:41
,注意是vb程序.不是c语言.各位大虾快救命.
vb3个数的排序程序,输入A,B,C三个数,执行程序后按从小到大排列,然后在第四个框里显示出来.求程序代码
,注意是vb程序.不是c语言.各位大虾快救命.
假设要比较的三个数输入在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 Sub
再问: 谢谢,如果要加个清除按钮,该加什么代码?
再答: 清除什么? text1.text="" 设置对应的文本框="" 就是清除