永发信息网

VB求解释 Dim a(9) As Integer,i%,j%,k%,temp% For i = 0 To 9 a(i) = Int(100*Rnd)

答案:2  悬赏:30  手机版
解决时间 2021-04-11 19:58
  • 提问者网友:未信
  • 2021-04-11 04:44
Print a(i)
Next i
Print

选择排序
For i = 0 To 8
k=i
For j=i+1 To 9
If a(j)Next j
temp=a(k)
a(k)=a(i)
a(i)=temp
Next i

冒泡排序
For i = 9 To 1 Step-1
For j = 0 To i-1
If a(j)>a(j+1) Then
temp=a(j)
a(j)=a(j+1)
a(j+1)=temp
End If
Next j
Next i

输出
For i=0 To 9
Print a(i)
Next i
Print
最佳答案
  • 五星知识达人网友:街头电车
  • 2021-04-11 05:01
Dim a(9) As Integer,i%,j%,k%,temp%
For i = 0 To 9
    a(i) = Int(100*Rnd)
    Print a(i)
Next i
Print上面这段代码是生成10个0-99之间的整数,并打印出来
全部回答
  • 1楼网友:渡鹤影
  • 2021-04-11 06:29
这样就对了“option explicit dim a() as integer, i as integer, j as integer, n as integer, m as integer, k as inet” 这个“option explicit “ 不可以同后面的变量定义同行,还有你的 ”k as in“ 这个错了,我猜您是想定义为正整型吧 ,正整型是 ”k as inet“ 这样定义。
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯