VB 怎么让文字居中？

Question

Private Sub Form_click()
Print Tab(25); "九九乘法表"
Print ; "------------------------"
For i = 1 To 9
For j = 1 To i
Print Tab((j - 1) * 12 + 1); ; i; "*"; j; "="; i * j;
Next j
Print
Next i
End Sub

帮忙看下这段 怎么让就九九乘法表这几个字居中
还有就是下面那个短横线 整个乘法表显示出来有多宽 短横线就延长到哪
要怎么实现 帮帮忙。

Answer 1

以Textbox为例说明，其余控件方法类似：

1.Vb中控件一般都是默认文字左对齐的

2.设置“Alignment”属性为2-Center

3.则文字就实现居中对齐了

Answer 2

print是VB的最基本的显示文本命令，无法实现对显示文字的精细控制，如果你想得到完美的显示效果，就要用到控件了。如果非要用Print，那就只能用笨办法了：

Private Sub Form_click()
Cls
Print Tab(49); "九九乘法表"
Print String(108, "-")
For i = 1 To 9
For j = 1 To i
Print Tab((j - 1) * 12 + 1); ; i; "*"; j; "="; i * j;
Next j
Print
Next i
End Sub

Answer 3

Private Sub Form_click()
Print Tab(49); "九九乘法表"
Print String(108, "-")
For i = 1 To 9
For j = 1 To i
Print Tab((j - 1) * 12 + 1); ; i; "*"; j; "="; i * j;
Next j
Print
Next i
End Sub

Answer 4

Private Sub Command1_Click()
Print Tab(50); "九九乘法表"
Print ; "-----------------------------------------------------------------------------------------------------------"
For i = 1 To 9
For j = 1 To i
Print Tab((j - 1) * 12 + 1); ; i; "*"; j; "="; i * j;
Next j
Print
Next i
End Sub

Answer 5

为什么一定要全在窗口上打印出来
用标签帮助方便得多