好不好让VB产生的随机横着排列输出,(我的每次都竖着排)

举报 回答
好不好让VB产生的随机横着排列输出,(我的每次都竖着排)
问在线客服
扫码问在线客服
  • 回答数

    5

  • 浏览数

    1,269

举报 回答

5个回答 默认排序
  • 默认排序
  • 按时间排序

没找到满意答案?去问秘塔AI搜索
取消 复制问题
已采纳
在VB中,如果你想让产生的随机数横着排列输出,可以在Print语句后面加上分号或逗号。 加分号直接连接,加逗号有间隔。当需要换行时,加一不带任何参数的Print。以下是示例代码:
Private Sub Command1_Click() Dim k, a(1 To 30) For i = 1 To 10 a(i) = Int(Rnd * 800 + 100) Next i For i = 1 To k Print a(i); If i Mod 8 = 0 Then Print Next i End Sub 这段代码会在同一行打印8个随机数,然后换行继续打印。如果你希望每次只打印一个随机数就换行,可以去掉If语句中的条件判断,或者修改条件判断为If i Mod 1 = 0 Then Print。
取消 评论
兄弟你这问题太真实了,我当年写VB作业时也被这个折磨得不行!关键不是随机数本身的问题,而是输出方式不对。你试试在For循环里用PrintRnd()&;这样每个数后面加个空格再接分号,就能横着铺开了;要是想要更整齐点,可以用Format函数控制小数位数,再配合Space(2)加固定空隙。千万别用vbCrLf,那玩意儿就是罪魁祸首,专干竖着排队的事儿,删掉它世界立马清静!
取消 评论
Print语句末尾加分号是不换行,加逗号是跳到下一个制表位,所以你写PrintInt(Rnd*100),就能自动对齐横排了!再配合Tab(10)这种定位命令,想怎么摆弄就怎么摆弄。记住啊,别信网上那些教你怎么重写循环的玄学方案,就改个符号的事儿,省下时间赶紧去摸鱼不香吗?
取消 评论
哎呀这个问题我之前也踩过坑!VB默认Print语句是换行输出的,所以你每次看到的都是竖着排的。想横着排其实超简单,把Print改成PrintTab或者直接用Print后面加个分号就行,比如Printi;这样就不会自动换行了,等所有数字都Print完再手动Print换行。记得循环里别手抖加太多空格,不然排版会乱套,我上次就因为多打了两个空格,结果数字全挤成一团了,调试了好久才搞定!
取消 评论
先把所有随机数存进数组,然后用Join函数拼成字符串,最后Print出来——瞬间横排!比如a=Array(Int(Rnd*10),Int(Rnd*10)),PrintJoin(a,),搞定!比折腾循环里的分号靠谱多了,而且还能自由控制间隔符,空格、逗号、破折号随你便,再也不用对着满屏竖条抓狂了!
取消 评论
ZOL问答 > 好不好让VB产生的随机横着排列输出,(我的每次都竖着排)

举报

感谢您为社区的和谐贡献力量请选择举报类型

举报成功

经过核实后将会做出处理
感谢您为社区和谐做出贡献

扫码参与新品0元试用
晒单、顶楼豪礼等你拿

扫一扫,关注我们
提示

确定要取消此次报名,退出该活动?