15电气 齐振昊 实验名称:在VB中三个数的排序
来源:互联网 发布:ppt软件有哪些 编辑:程序博客网 时间:2024/04/30 15:40
实验名称:在VB中三个数的排序
在桌面中双击VB6.0打开程序
在工具箱窗口找到command的图标,单击图标并在窗体中适当位置创建并在属性窗口中找到caption并把其后面改为“排序”
在窗体中双击command图标,并在弹出的对话框中输入代码。
代码如下:
Dim a As Integer
Dim b As Integer
Dim c As Integer
Dim swap AsInteger
a = Int(Rnd *1000)
b = Int(Rnd *1000)
c = Int(Rnd *1000)
If a < b Then
swap = a
a = b
b = swap
End If
If a < c Then
swap = a
a = c
c = swap
End If
If b < c Then
swap = b
b = c
c = swap
End If
Print a& "," & b & "," & c
在工具栏中单击“启动”并单击“交换”即可出现效果。
2016 物理与电子信息学院15电气1班齐振昊15050341022
0 0
- 15电气 齐振昊 实验名称:在VB中三个数的排序
- 15电气 齐振昊 实验名称:在VB中制作计时器
- 15电气 齐振昊 实验名称:VB中数字的交换
- 15电气 齐振昊 实验名称:在VB中对于随机数ab的比较大小
- 15电气 齐振昊 实验名称:在VB中制作计时器(运行时时间是停止的)
- 15电气 齐振昊 实验名称:15个数排序
- 15电气齐振昊 在VB中排序(使用循环机构,在textbox中输入要排序的个数即可)
- 15-电气-李少振 在VB中使用循环结构排序
- 15 电气 齐振昊 VB中使用选择法排序
- 15 电气 齐振昊 VB中使用冒泡法排序
- 15 电气 齐振昊 在VB中把最小的数排到最后
- 15 电气 齐振昊 VB 中16进制
- 15电气 齐振昊 实验名称:红糖水白糖水的交换
- 15电气郄慧敏vb作业715个数的大小排序
- 实验名称:在VB中对于随机数ab的比较大小
- 15 电气 齐振昊 VB中两位数乘一位数
- 15 电气 齐振昊 VB中三位数乘一位数
- 15电气郄慧敏vb作业2在VB中制作计时器2
- java小程序之从方法中返回数组
- 第五课-系统调用跟踪
- Mybatis第五弹
- C++ 宏定义
- Arch的VBox安装笔记
- 15电气 齐振昊 实验名称:在VB中三个数的排序
- Makefile初学(2)
- Codeforces 622F (拉格朗日插值 费马小定理)
- mysql5.7安装Table 'mysql.user' doesn't exist
- spring+springMVC,声明式事务失效,原因以及解决办法
- Mybatis第六弹
- spring基础
- codeforces 540C Ice Cave【BFS】
- hdoj 1052 Tian Ji -- The Horse Racing