VB6中的只读文本框

VB6中的只读文本框,vb6,tooltip,readonly,Vb6,Tooltip,Readonly,我在VB6控件中有一个文本框,其中包含一些从数据库填充的数据。当没有数据时,它将为空。 现在我的要求是,文本框应该是只读的,并且应该有一些工具提示文本 我试图保持Textbox1.Enabled=false,但这不会显示我的工具提示。 当我保持Textbox1.Locked=True时,我得到了工具提示,但是我能够编辑文本框中的文本,我们应该不能这样做 请向我推荐任何解决方案。正如另一位指出的那样,Locked属性应该可以工作,您可以尝试使用Windows API Option Explicit

我在VB6控件中有一个文本框,其中包含一些从数据库填充的数据。当没有数据时,它将为空。 现在我的要求是,文本框应该是只读的,并且应该有一些工具提示文本

我试图保持
Textbox1.Enabled=false
,但这不会显示我的工具提示。 当我保持
Textbox1.Locked=True
时,我得到了工具提示,但是我能够编辑文本框中的文本,我们应该不能这样做


请向我推荐任何解决方案。

正如另一位指出的那样,
Locked
属性应该可以工作,您可以尝试使用Windows API

Option Explicit

Private Const EM_SETREADONLY = &HCF

Private Sub Form_Load()

    Call SendMessage(Text1.hwnd, EM_SETREADONLY, 1, 0)

End Sub

TextBox
Locked
属性设置为
True
时,您为什么能够在
TextBox
中编辑文本?确切地说,你是如何实现它的?同意,如果它被锁定,它就不能接受输入(尽管你可以聚焦它)是的,伊利亚·库诺索夫。即使将Locked设置为True,我也可以编辑文本。我不知道为什么会这样。我错过什么了吗?请帮帮我。你试过打字吗?它会改变框中的内容,还是只允许您高亮显示并显示闪烁的光标?此外,如果信息不需要编辑,那么最好将其传递到标签或替代控件中。是的,Westie。我能够输入数据,而不仅仅是闪烁的光标。如果我们无法使用文本框,我只能使用标签。