vb程序设计:利用随机函数生成50个(100,200)区间的随机整数,在窗体中按10个数一行的格式显示。
PrivateSubForm_Click()RandomizeFori=1To5Forj=1To10n=Int(Rnd()*100)+100PrintnNextjPrin...
Private Sub Form_Click()
Randomize
For i = 1 To 5
For j = 1 To 10
n = Int(Rnd() * 100) + 100
Print n
Next j
Print
Next i
End Sub
求问为什么我的代码运行出来不是10个一行,而是10个一列? 展开
Randomize
For i = 1 To 5
For j = 1 To 10
n = Int(Rnd() * 100) + 100
Print n
Next j
Next i
End Sub
求问为什么我的代码运行出来不是10个一行,而是10个一列? 展开
2个回答
展开全部
将第5行的“print n”改为“print n;”
少一个分号而已
少一个分号而已
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
dim out as String
out=""
For i = 1 To 5
For j = 1 To 10
n = Int(Rnd() * 100) + 100
out=out & str(n)
Next j
Print out
out=""
Next i
这样写就可以了
out=""
For i = 1 To 5
For j = 1 To 10
n = Int(Rnd() * 100) + 100
out=out & str(n)
Next j
Print out
out=""
Next i
这样写就可以了
追问
可这段代码那边出错了,我同学一样的代码,运行出来的就是一行的?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询