vba - VBA中文本框中的文本对齐 - 奇怪的行为

Question

我正在尝试将文本框中的文本对齐到右侧。通过代码TextBox.TextAlign = fmTextAlignRight或“直接”设置属性。

不幸的是，一旦文本（字符串）变得太大而无法在文本框中完全显示，它就会左对齐。就像这个例子一样，它有从 a 到 z ( abcdefghijklmnropqrstuvwxyz) 的所有字母并且应该是右对齐的，但它不是：

它应该如下所示：

关于如何改变这种行为/如何强制对齐的任何想法？谢谢！

Answer 1

可能这TextBox将属性Enabled设置为false。您需要将其打开，然后该TextAlign属性将按您的意愿工作。此外，您可以使用此功能：

Public Function SetTextBox(itm1 As MSForms.textbox, ByVal txtAlign1 As MSForms.fmTextAlign)
    Dim notEnabled1 As Boolean
    If Not itm1.Enabled Then itm1.Enabled = True: notEnabled1 = True
    itm1.SetFocus
    itm1.TextAlign = txtAlign1
    itm1.SelStart = Len(itm1.Text)
    If notEnabled1 Then itm1.Enabled = False
End Function