UC知道关于VB的TAB函数的问题？？
来源：百度知道 编辑：UC知道 时间：2024/05/31 19:37:03
大家可以做下这两个代码，为什么第一个是斜排的了，而第二个是横排的了，这个与tab函数有什么关系，望高手解决下？？
1、Private Sub Form_Click()
Print Tab(2); "*"
Print Tab(10); "*"
Print Tab(18); "*"
Print Tab(26); "*"
Print Tab(34); "*"
Print Tab(42); "*"
Print Tab(50); "*"
Print Tab(2); "*"
End Sub
2、Private Sub Form_Click()
Dim asc As Integer, i As Integer
Print " ASC码对照表"
For asc = 32 To 126
Print Tab(8 * i + 2); Chr(asc); "="; asc;
i = i + 1
If i = 7 Then i = 0: Print
Next asc
End Sub
1、Private Sub Form_Click()
Print Tab(2); "*"
Print Tab(10); "*"
Print Tab(18); "*"
Print Tab(26); "*"
Print Tab(34); "*"
Print Tab(42); "*"
Print Tab(50); "*"
Print Tab(2); "*"
End Sub
2、Private Sub Form_Click()
Dim asc As Integer, i As Integer
Print " ASC码对照表"
For asc = 32 To 126
Print Tab(8 * i + 2); Chr(asc); "="; asc;
i = i + 1
If i = 7 Then i = 0: Print
Next asc
End Sub
tab是列位置输出函数
第一个：因为＊号之号没有标点，所以显示为在第二列输入一个星号，然后换行在第10列输出一个星号．依次类推．
第二个：asc之后有一个分号，所以会把所输出的内容打在一行上显示，换行的要求是 i = 7，即输出七个字符之后换行．
Print Tab(8 * i + 2) 就是列的位置
以上两例说明，在tab函数之后，带标点与不带标点，会影响输出位置．
差不多了。
回答者： 魔_灵 - 见习魔法师 三级 2-17 01:37
真有才！！！
Print Tab(8 * i + 2); Chr(asc); "="; asc;
改为Print Tab(8 * i + 2); Chr(asc); "="; asc，
这样就可以是斜排了