作者fumizuki (小獅)
看板Visual_Basic
標題如何text不顯示游標？
時間Fri Apr 1 11:11:55 2005
讓 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
1F：推 JJss:推 很詳細!!! 210.69.52.215 04/01
2F：推 dieb:真不錯^^ 61.229.48.193 04/01