• 所有问题

    • 用VB语言编写 输出1~100每行输出10个数，请问怎么写？

    如题所述

    举报该问题
    推荐答案   2014-01-23
    应该是这样(对VB不杂熟悉，但方式是这样的)set i=1for i to 101 step 1if i mod 10 =0 then'这里输出 i 并换行else'直接输出 iend ifnext
    温馨提示：答案为网友推荐，仅供参考
    其他回答
    第1个回答  2014-01-23
    For i = 1 To 100
    If i Mod 5 = 0 Then
    Print i
    End If
    Next i
    相似回答
    ...存放在数组x中,输出出现3次的数,每行输出10个数答：Private Sub Command1_Click()Dim Nrep(100) As Integer Dim a As Integer Randomize For i = 1 To 100 a = Int(Rnd * 100 + 1)Nrep(a) = Nrep(a) + 1 Debug.Print a;Next Debug.Print For i = 1 To 100 If Nrep(i) = 3 Then Print i;Next i Print End Sub BTW， 楼上...
    用vb生成1--100之间的随机数一共一百个,每行显示10个数字,答：Next
    vb随机生成10个数,在1到100之间,并且按照从大到小的顺序排成一行答：Dim shuzu(1 To 10) As Integer Dim i As Integer Private Sub Form_Load()Me.AutoRedraw = True Randomize i = 1 For i = LBound(shuzu) To UBound(shuzu)shuzu(i) = 1 + Int(100 * Rnd())Print shuzu(i);Next Print paixu shuzu For i = LBound(shuzu) To UBound(shuzu)Print ...
    ...在窗体上打印出[1,100]的数,一行打印10个数,一共打印10行,一个数...答：Private Sub Command1_Click()Dim a(1 To 100)For i = 1 To 100 a(i) = Int(Rnd * 100)If Len(a(i)) < 2 Then '占五个字符 如果是两位数就占四位 h = 5 Else h = 4 End If Print Spc(h); a(i);If i Mod 10 = 0 Then Print Next End Sub ...
    利用VB如何设计下面问题:利用随机数产生10个1~100之间的随机数,显示...答：Print "10个数中的最小值为" & min For p = LBound(m()) To UBound(m())sum = sum + m(p)Next p avg2 = sum / UBound(m())Print "10个数中偶数之平均数为" & avg2 sum = 0 For q = LBound(n()) To UBound(n())sum = sum + n(q)Next q avg1 = sum / UBound...
    大家正在搜
    编程输入三个数输出最大数汇编语言是一种什么程序设计语言编写c语言程序输出图形编写c语言程序输出名字用高级语言编写的程序编写一个程序输出图形编写一个程序输出以下图形高级语言编写的程序称为编写程序输出
    相关问题
    VB问题。请问输出的100个数怎么用十行十列输出来？
    vb设计1―100的数 每行十个数
    vb语言中每行显示数字10个但是为什么做出来第一行总是9个
    VB 问题 100到200能被3或被5整除的数，每行输出10...
    用VB求出100以内的素数后要求每十个一行输出，该怎么写程序...
    输入100个数字，每10个数字换行，用VB中的自动换行的编程...
    输出0-100的数，每行输出10个。错在哪？
    vb1-100的奇数怎么以每行五个输出