vb中文本框的對齊怎么寫代碼

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中文本框的對齊怎么寫代碼】

vb中文本框的對齊怎么寫代碼

文章插圖