MS 访问如何通过 VBA 代码设置控件的方向

Question

我得到了这段代码，我试图将控件的方向更改为 RtL 方向。 我卡住了！

Private Sub Notes_GotFocus()
  Me.Controls("Notes").Properties("Orientation") = ac something according to help...`

orientation =1 表示 RTL

请帮忙 阿夫里

我将值设置为“1”但是没有成功 该属性也没有 ac 命令

Answer 1

经过长时间的研究:):):) 这是对齐/方向的解决方案：

Private Sub Notes_GotFocus()
       Me.Controls("Notes").TextAlign = 3
       Call ActivateKeyboardLayout(Heb, True)
   End Sub

控件名称为Notes。它是一个长文本字段。当它获得焦点时，书写方向更改为 RtL，语言更改为希伯来语。 TextAlign = 3 表示 RTL