print事件如何使每一行输出的数为设定的个数

来源：百度知道 编辑：UC知道 时间：2024/06/10 07:33:03
我用array函数将一个数组赋值，m=Array（23，93，29，87，37，92，74，88，90，24）。现在要将这10个数用print方法在form1中打印，要求每一排打印4个元素，请问如何编写来达到这种换行的目的？请写出主要的方法。
各位真是高手，但我是初学者，只能勉强明白第五位 rninss的意思，我还有几点疑问:For i = 1 To 10 是元素的编号从1到10，但有的时候，只能写成for i= 0 to 9，这是什么原因；还有If (i Mod 4) = 0 Then Print 事件中的print的意思我不很清楚，难道是从某一个位置开始向右一直打印空白？还有在form中打印的时候，这个print向右打印是无限的吗还是受form窗体的大小限制，当打印到窗体的最右边的时候就结束；还有一个问题，这个换行是不是用这种方法实现的：当上面的打印空白事件print把form中的一排打印满之后，如果再打印的话就从下一行开始？

Option Base 1 '数组的下标置为1
Private Sub Command1_click()
Dim i As Integer
m = Array(23, 93, 29, 87, 37, 92, 74, 88, 90, 24)
For i = 1 To 10
Print m(i); '后面加逗号或者分号才不会换行
If (i Mod 4) = 0 Then Print '打印4个数以后换行 ,print用来换行
Next i
End Sub

在窗体上画一个命令按钮,名称为Command1,用一个循环语句for,从m(1)-m(10)输出数组中的10个数,用(i mod 4)=0来判断是否已经输出了四个数,即"i对4求余,如果余数为0,则能被整除".

"For i = 1 To 10 是元素的编号从1到10，但有的时候，只能写成for i= 0 to 9，这是什么原因?"
答:m = Array(23, 93, 29, 87, 37, 92, 74, 88, 90, 24),定义了一个10位数的数组,数组默认的下标是从0开始的,也就是说数组的10个元素是从m(0)-m(9),所以我们用一句 Option Base 1,把数组的下标置为1,这样10个数组元素就变成m(1)-m(10)

"还有If (i Mod 4) = 0 Then Print 事件中的print的意思我不很清楚"
答:用print方法:打印完print后面字符串或者变量以后自动换到下一行.
"Print m(i); '后面加逗号或者分号才不会换行"这里已经说到print方法的最后要加了逗号或者分号才不会换行,If (i Mod 4) = 0 Then Print 事件中的print是指打印空字符(其实也就是什么都没打印),因为后面没有加逗号或者分号,所以在打印完空字符以后自动换行,也就起到了换行的作用

"还有在form中打印的时候，这个print向右打