00问答网
所有问题
当前搜索:
vb从小到大排序
VB
程序 给任意5个数
从小到大
次序打印出来
答:
Next a For i = 1 To 5 For j = 1 To 5 - i If arry(j) > arry(j + 1) Then b = arry(j + 1)arry(j + 1) = arry(j)arry(j) = b End If Next j Next i For i = 1 To 5 Print arry(i)Next i End Sub 保存后运行单击命令按钮5个数即可
从小到大
输出到窗体上 ...
VB
的:输入三个数X、Y、Z,按
从小到大
的顺序输出这三个数
答:
THEN 后面直接换行!(或加冒号 : )你的程序太乱!题目中是X、Y、Z,程序中是a、b、c,一会儿又有m、n 这样写:Private Sub Command1_Click()X = Text1.Text: Y = Text2.Text: Z = Text3.Text If X>Y Then m = X : X = Y : Y = m If X>Z Then m = X : X = Z :...
vb
利用随机函数产生25个10到99之间的整数,按
从小到大
顺序显示,谢谢,急...
答:
Dim a%(1 To 25)For i = 1 To 25 a(i) = Int(Rnd * 90 + 10)Print a(i);Next i Print For i = 1 To 24 p = i For j = i + 1 To 25 If a(p) > a(j) Then p = j Next j t = a(i): a(i) = a(p): a(p) = t Next i Print "
从小到大排序
为...
...找出其中的偶数,并将这些偶数
从小到大排序
。
答:
dim i as int dim a(29) as int for i=1 to 30 step 1 a(i-1)=int(rd*100)if a(i-1)<10 then i=i-1 else continue next ___呵呵,两年没编过了,也没装
VB
,没办法试,仅供参考,或许有些和C语言都搞混了
VB
数组
排序
问题
答:
1.Private Sub Command1_Click()dim a(1 to 10) as integer,I as integer,J as integer,R for I=1 to 10 Randomize a(i)=int(rnd()*99)+1 next I for I=1 to 9 for J=I+1 to 10 if a(i)>a(j) then r=a(i):a(i)=a(j):a(j)=r end if next j next i for i...
VB
编程:读取文本中的成绩,按照
从小到大排序
,可是用我的代码输出后最大...
答:
Private Sub Form_Load()Dim s() As String, i As Long, j As Long, n As StringOpen "D:\scores.txt" For Binary As #1s = Split(Split(Input(LOF(1), #1), vbCrLf)(1), " ")Close #1For i = 0 To UBound(s) - 1 For j = i + 1 To UBound(s) If Val(s(i...
VB
三个数的
排序
答:
Private Sub Command1_Click()x = InputBox("xxx")y = InputBox("yyy")z = InputBox("zzz")If x < y Then t = y y = x x = t End If If x < z Then t = z z = x x = t End If If y < z Then t = z z = y y = t End If Print "
排序
后"; x; y; z ...
vb
编写一个能对一维数组进行升序排列的子程序过程!
答:
VB
编程题 评分程序界面 c
从小到大排序
正在求助 换一换 回答问题,赢新手礼包 苦等24分钟: 为什么灵魂风暴这么难 回答 苦等36分钟: 为什么实体店受网络冲击这么严重,药店却越开越多 回答 苦等50分钟: 家庭理财的途径都有哪些 应该如何配置资产 回答 苦等51分钟: 男人出门怎么穿才好看 回答 苦等2小...
用
VB
编写,输入三个整数使之按照
从小到大
顺序输出的代码
答:
include <stdio.h> int main(){ int t,a,b,c;scanf("%d%d%d",&a,&b,&c);if(a
VB
高手解释选择
排序排序
答:
p=j记录的是每一轮选择
排序
过程的最小值的数组下标。选择排序和冒泡排序的排序过程对比(
从小到大
):选择排序(10个元素)--- 冒泡排序(10个元素)For i = 1 To 9 --- For i = 9 To 1 Step -1 p = i For j = i + 1 To 10 --- For j = 1 To i If a(p) > a(j) Th...
棣栭〉
<涓婁竴椤
6
7
8
9
11
12
13
14
10
15
涓嬩竴椤
灏鹃〉
其他人还搜