,注意是vb程序.不是c语言.各位大虾快救命.
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/07/25 05:31:41
,注意是vb程序.不是c语言.各位大虾快救命.
vb3个数的排序程序,输入A,B,C三个数,执行程序后按从小到大排列,然后在第四个框里显示出来.求程序代码
vb3个数的排序程序,输入A,B,C三个数,执行程序后按从小到大排列,然后在第四个框里显示出来.求程序代码
![,注意是vb程序.不是c语言.各位大虾快救命.](/uploads/image/z/6530868-36-8.jpg?t=%2C%E6%B3%A8%E6%84%8F%E6%98%AFvb%E7%A8%8B%E5%BA%8F.%E4%B8%8D%E6%98%AFc%E8%AF%AD%E8%A8%80.%E5%90%84%E4%BD%8D%E5%A4%A7%E8%99%BE%E5%BF%AB%E6%95%91%E5%91%BD.)
假设要比较的三个数输入在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="" 设置对应的文本框="" 就是清除
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="" 设置对应的文本框="" 就是清除
,注意是vb程序.不是c语言.各位大虾快救命.
C语言里void 注意,不是作用,
C语言编写程序 求一个整数各位数字之和.
如何用VB语言编写这个程序?
用C语言编写程序 //求1到20内任意两数的最小公倍数 注意:是任意两个数
C语言中求pi值,语句顺序不同,结果不同,哪位大虾能给我解释下程序是怎么个运行过程
C语言是什么?C语言是程序还是什么意思?
网络语言意思灌水 菜鸟 造砖 大虾 稀饭注意!是网络语言中的意思!
c语言计算sin(x)值的程序.泪奔跪求各位高手如下程序哪里出错了!
C语言程序填空/*---------------------------------------------------
c语言程序题 输入一个整数,求它的位数及各位数字之和.例如,123的位数是3,各位数字之和是6.
Visual foxpro小程序题..用vf语言 不是c语言或者其他的.