育才学习网1.vb记事本中左对齐和右对齐的代码怎么写
设定Alignment 属性，但其在执行阶段为唯读
0 -- 靠左
1 -- 靠右
2 -- 靠中
要确保 Alignment 属性能够正确作用，Textbox 控制项中的 MultiLine 属性就必须设
定为 True。如果 Textbox 控制项中的 MultiLine 设定为 False，则会忽略Alignment
属性的设定。
所以，如果您想设定其为单行，又想令其有非左靠齐的作用那只好在TextBox的KeyPress
下底下的程式，以去除Enter的作用，当然要先设定MultiLine = True
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = vbKeyReturn Then
KeyAscii = 0
End If
End Sub
2.vbcommand中文本框的内容靠左对齐
VB的文本框不支持这种操作，你可以用富文本框来实现这种操作。打开工程菜单，选部件，选中Microsoft Rich Textbox Control，确定。然后就可以把富文本框添加到窗体上了。下面是实现对齐的代码。
Private Sub Command1_Click()
RichTextBox1.SelAlignment = rtfLeft
End Sub
Private Sub Command2_Click()
RichTextBox1.SelAlignment = rtfCenter
End Sub
Private Sub Command3_Click()
RichTextBox1.SelAlignment = rtfRight
End Sub
转载请注明出处育才学习网 » vb中文本框的对齐怎么写代码