用VB写一下三个数大小排序，谢谢大神！
展开全部
Dim a As Double
Dim b As Double
Dim c As Double
Dim z As Double
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
If a > b Then
z = a
a = b
b = z
End If
If b > c Then
z = b
b = c
c = z
End If
If a > b Then
z = a
a = b
b = z
End If
执行后，a最小，c最大，b在中间
来自：求助得到的回答
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
