VB从键盘输入任意三个数A,B,C,将其值按由大到小的顺序显示出来

最新推荐文章于 2024-12-08 20:09:10 发布

转载最新推荐文章于 2024-12-08 20:09:10 发布 · 1.1w 阅读

文章标签：

#VB

VB 专栏收录该内容

5 篇文章

订阅专栏

本文提供了一个使用VBA编写的简单示例程序，该程序通过输入框获取三个数值，并将其按从大到小的顺序输出。此代码适用于初学者了解基本的VBA语法和流程控制。

Private Sub Form_Load()
Dim x As Integer,y As Integer,z As Integer
Dim diyige As Integer
Dim dierge As String,disange As String,disige As String
diyige = InputBox("请输入A:","数据输入")
dierge = InputBox("请输入B","数据输入")
disange = InputBox("请输入C","数据输入")
x = Val(diyige)
y = Val(dierge)
z = Val(disange)
If x > y And y > z Then
Print x,y,z
ElseIf y > z And z > x Then
Print y,z,x
ElseIf z > x And x > y Then
Print z,x,y
End If
Print "你输入的数据按从da到xiao的顺序是:"
End Sub