【VB测绘程序设计】案例8——IF选择结构练习排序（附源代码）

【VB测绘程序设计】案例6——IF选择结构练习排序（附源代码）

---

前言

本文主要掌握Val（）函数转换，inputBox函数、IF条件句的练习，输入3个数，按大到小排序并打印。

一、界面显示

二、程序说明

利用inputBox函数，输入三个数字，存放到数值型变量中，然后进行比较。对三个数进行排序，只能通过两两比较，一般可用三条单分支if语句来实现。

三、程序代码

Private Sub Command1_Click()
Dim x!, y!, z!
x = Val