更改插入顏色或隱藏VB.NET

Question

我正在在VB.NET的程序和需要隱藏插入符文本框。

我可以忍受它是要麼完全隱藏或者一樣的顏色作爲文本框的背景顏色。我怎麼能這樣做呢？如果可能的話，我寧願遠離自定義控件。

謝謝

Answer 1

添加一個新類到您的項目並粘貼如下所示的代碼。編譯。將新控件從工具箱的頂部拖放到表單上。

Public Class NoCaretBox 
    Inherits TextBox 

    Protected Overrides Sub OnGotFocus(ByVal e As System.EventArgs) 
    HideCaret(Me.Handle) 
    MyBase.OnGotFocus(e) 
    End Sub 

    Protected Overrides Sub OnLostFocus(ByVal e As System.EventArgs) 
    ShowCaret(Me.Handle) 
    MyBase.OnLostFocus(e) 
    End Sub 

    Private Declare Function HideCaret Lib "user32.dll" (ByVal hWnd As IntPtr) As Boolean 
    Private Declare Function ShowCaret Lib "user32.dll" (ByVal hWnd As IntPtr) As Boolean 
End Class