沒想到發帖要幾份：）
Public Class Form1
Implements IMessageFilter
Private Sub Form4_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Application.AddMessageFilter(Me)
End Sub
Public Const WM_MOUSEMOVE As Integer = &H200
Function PreFilterMessage(ByRef m As Message) As Boolean Implements IMessageFilter.PreFilterMessage
If m.Msg = WM_MOUSEMOVE Then
MaskedTextBox1.Text = Control.FromHandle(m.HWnd).Name
Return False
End If
Return False
End Function
End Class
uj5u.com熱心網友回復：
自己結貼能不能把幾份還我？我只是助人為樂啊uj5u.com熱心網友回復：
這種情況還是發到博客比較好;uj5u.com熱心網友回復：
如果能獲取滑鼠在任意視窗的某個控制元件上才是真的猛
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/36345.html
標籤：VB.NET
上一篇：DW 用瀏覽器除錯asp網頁，總出現HTTP 錯誤 404.0 - Not Found 您要找的資源已被洗掉、已更名或暫時不可用