请问如何让text控件中的文字起始位置向右偏移几个像素？

Question

也就是文本框左边不能显示字符。

Answer 1

Private Const EM_SETMARGINS = &HD3Private Const EC_LEFTMARGIN = &H1
Private Const EC_RIGHTMARGIN = &H2
Private Const EC_USEFONTINFO = &HFFFFPrivate Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Sub Command1_Click()
    SendMessage Text1.hwnd, EM_SETMARGINS, ByVal EC_LEFTMARGIN, ByVal 100
    
End Sub

Answer 2

正解to jjkk168(老加班的人) 把问题扩展一下：文本框上边不能显示字符？

Answer 3

用Text1.Tag属性存储真实的字符串

Answer 4

谢谢jjk168！祝你加班比上班挣得还多！

Answer 5

TO GGL123上边不能显示字符我没有找到合适的消息，也不知道该怎么来处理了，期盼牛人解答