VB编程题 输入xyz三个数,按从小到大的次序显示
发布网友
发布时间:2022-12-23 09:14
我来回答
共3个回答
热心网友
时间:2023-06-21 20:12
源程序如下:
1. 利用InputBoxb函数输入3个数,存放到数值型变量中,然后对其进行比较。
2. 对三个数进行排序,只能通过两两对比,一般可用三条单分支IF语句来实现。
3 .要显示多个数据,可以用“;”逐一显示,也可利用“&”字符串连接将多个变量连接显示。
解题:
先在窗体上画一个按钮,代码如下:
Private Sub Command1_Click()
Dim x!, y!, z!
x = InputBox("input x")
y = InputBox("input y")
z = InputBox("input z")
Print " 排序前:"; x; " "; y; " "; z
If x < y Then t = x: x = y: y = t
If x < z Then t = x: x = z: z = t
If y < z Then t = y: y = z: z = t
Print " 排序后:"; x; " "; y; " "; z
End Sub
运行程序效果图如下:
扩展资料:
其他实现方法:
Private Sub Command1_Click()
Dim tmp, i, j As Integer '定变量
Dim a(2) As Integer '定数组
a(0) = x
a(1) = y
a(2) = z 'xyz三个数赋值给数组,实际调试中用实际数字代替
For i = 0 To 1
For j = 1 To 2
If a(i) > a(j) Then
tmp = a(i)
a(i) = a(j)
a(j) = tmp
End If
Next j
Next i '循环由小到大排序,估计这是考点
Print a(0)
Print a(1)
Print a(2) ,由小到大逐一打印
热心网友
时间:2023-06-21 20:12
如果这是一道考试题目的话,考察的知识点还是很多的。
出题人的本意估计是要考数组循环排序,单纯xyz 3个数字比较的话其实还有很多更简单的写法。
Private Sub Command1_Click()
Dim tmp, i, j As Integer '定变量
Dim a(2) As Integer '定数组
a(0) = x
a(1) = y
a(2) = z 'xyz三个数赋值给数组,实际调试中用实际数字代替
For i = 0 To 1
For j = 1 To 2
If a(i) > a(j) Then
tmp = a(i)
a(i) = a(j)
a(j) = tmp
End If
Next j
Next i '循环由小到大排序,估计这是考点
Print a(0)
Print a(1)
Print a(2) ,由小到大逐一打印
热心网友
时间:2023-06-21 20:13
#include "stdio.h" #include "stdlib.h" int main(){ int a[4],i,j,m; scanf("%d",&a[1]); scanf("%d",&a[2]); scanf("%d",&a[3]); for(i=1;i
VB编程题 输入xyz三个数,按从小到大的次序显示
源程序如下:1. 利用InputBoxb函数输入3个数,存放到数值型变量中,然后对其进行比较。2. 对三个数进行排序,只能通过两两对比,一般可用三条单分支IF语句来实现。3 .要显示多个数据,可以用“;”逐一显示,也可利用“&”字符串连接将多个变量连接显示。解题:先在窗体上画一个按钮,代码如下:Priva...
...54呢 ?而且用电脑试了一试,xyz打乱次序输入这三个值,结果一直_百度...
这个是一个3数值排序程序。输入三个数,依次比较三个数的大小,以从小到大排列输出。
冰封王座地图怎么做
3.为玩家12在TankSkels1域中任意一点新建一个单位名为RoadKill Skeleton的骷髅,并执行30次(其实效果便是在TankSkels1域内建立30个RoadKill Skeleton。玩家可能会觉得这个等同于上面的语句,但是请注意,因为域内的随机点在每次执行语句时都会变化,所以这30个RoadKill Skeleton不会像上个语句里的两个Giant Skeleton Warrior...
C++面向对象程序设计问题,求教
2.把从键盘上输入的一个大于等于3的整数分解为质因子的乘积。如输入24时得到的输出结果为“2 2 2 3”,输入50时得到“2 5 5”,输入37时得到的结果为37。include<iostream.h> void main(){ int x;cout<<"请输入一个整数,若小于三则重输:";do cin>>x;while(___x<3___);int i=2...
...地图编辑器中在屏幕上出现任务提示?如何杀掉三个单位后游戏胜利...
任务提示 触发器的动作分类里 有任务提示 如何杀掉三个单位后游戏胜利 触发器里先设置一个整型变量 触发器 事件-任意单位死亡 条件-死亡的单位是XX 这个地方看自己图的具体情况自己设定 动作 设置变量=变量+1 如果 变量大于或者等于3 游戏 - 游戏胜利 否则 结束如果 ...