UC知道VB Print显示问题
来源：百度知道 编辑：UC知道 时间：2024/06/02 11:21:48
Dim a%(19), s%(9), i%, j%, k%
Private Sub Command1_Click()
For i = 0 To 19
a(i) = Int(99 * Rnd + 1)
Picture1.Print Tab(j); a(i);
j = j + 1
If j = 4 Then j = 0: Picture1.Print
Picture1.Print
Next i
End Sub
本想显示方正，答案却是锯齿状。怎么修改呢？高手顺便也详细讲解一下Tab定位的含义，教科书上的太笼统了！
那怎么修改呢？输出方阵！
Private Sub Command1_Click()
For i = 0 To 19
a(i) = Int(99 * Rnd + 1)
Picture1.Print Tab(j); a(i);
j = j + 1
If j = 4 Then j = 0: Picture1.Print
Picture1.Print
Next i
End Sub
本想显示方正，答案却是锯齿状。怎么修改呢？高手顺便也详细讲解一下Tab定位的含义，教科书上的太笼统了！
那怎么修改呢？输出方阵！
你这个程序本意就是输出锯齿状的，怎么会输出正方呢？
Tab(x),就是表示x个制表位，也就是空格
看你的意思是要输出4×5的方阵，但print语句应该是每次都要换行的，所以应该在print的那一行一次输出4个数字，不要tab(j)了。
原来早期的解释型Basic如果Print语句以分号结尾表示不换行，可能你的原题就是这个意思，但到了VB不知道是否行得通，反正我用VBA试了不行，我没装VB，没法测试。