12.编写VB程序,实现从键盘上输入任意3个整数,比较之后,按从大到小顺序输出。

[复制链接]
查看11 | 回复1 | 2012-11-24 14:40:27 | 显示全部楼层 |阅读模式
Private Sub Form_Load()Dim a(2) As IntegerDim temp As IntegerFor i = 0 To 2 a(i) = InputBox("请输入第" & i + 1 & "个整数")Next For i = 0 To 1
For j = i + 1 To 2
If a(i) < a(j) Then
temp = a(i)
a(i) = a(j)
a(j) = temp
End If
NextNextMsgBox "你输入的数是" & ...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行