如何text不顯示游標？
讓 TextBox、ComboBox 不顯示游標的方法
直覺想到將 Enabled 屬性設為 False
但是這樣做的話，控制項本身會反白，不能使用，事件也不再觸發。
除了更改 Enabled 屬性外，還有一個方法，使用 API ！
首先將下面這一行加到一般模組中
Public Declare Function HideCaret Lib "user32" (ByVal hWnd As Long) As Long
然後在你的程式碼中加上這一行
HideCaret Text1.hWnd
至於重新顯示游標的方法，送出滑鼠鍵的訊息即可。
SendMessage Text1.hWnd, WM_LBUTTONDOWN, 0, 0
SendMessage Text1.hWnd, WM_LBUTTONUP, 0, 0
使用 SendMessage 必須要將下面這一行加到一般模組中
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
(ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, _
lParam As Any) As Long
--
人若無星爺，跟條鹹魚有何分別？
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.222.155.162
推
210.69.52.215 04/01, , 1F
210.69.52.215 04/01, 1F
推
61.229.48.193 04/01, , 2F
61.229.48.193 04/01, 2F
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章
