獲取滑鼠指標在ListBox中的行位置

2021-03-31 08:56:29 字數 890 閱讀 1475

新建乙個工程,在form1窗體上加上乙個listbox和乙個label.在窗體**中貼上以下程式,然後執行即可.

option explicit

private declare function sendmessage lib "user32" alias "sendmessagea" (byval hwnd as long, byval wmsg as long, byval wparam as long, lparam as any) as long

private const lb_itemfrompoint = &h1a9

private sub form_load()

dim i as integer

for i = 1 to 5

list1.additem trim(str(i))

next

end sub

private sub list1_mousemove(button as integer, shift as integer, x as single, y as single)

dim lstpos as long

dim xx as long

dim yy as long

xx = clng(x / screen.twipsperpixelx)

yy = clng(y / screen.twipsperpixely)

lstpos = sendmessage(list1.hwnd, lb_itemfrompoint, 0, byval ((yy * 65536) + xx))

if lstpos < list1.listcount then

label1.caption = "當前位置為: " & lstpos

end if

end sub

使用C 在console中獲取滑鼠事件

第一點,使用標頭檔案 要在console裡進行操作,首先先說一下readconsoleinput 函式。msdn的具體解釋如下 來自這個函式主要是用於獲取控制台資訊。其實lpbuffer所返回的資訊中,包括了多個事件,其中有focusevent,keyevent,windowbuffersizeev...

WPF 獲取滑鼠指標下的元素

wpf 獲取滑鼠指標下的元素 周銀輝以前寫過一些getelementundermouse之類的函式,要用到座標換算而顯得有些麻煩 特別是當元素有 transform的時候 今天看到mouse類居然有乙個directlyover屬性,可以獲得滑鼠下的元素,很奇怪,我的msdn文件以及vs2008智慧型...

WPF 獲取滑鼠指標下的元素

原文 wpf 獲取滑鼠指標下的元素 wpf 獲取滑鼠指標下的元素 周銀輝以前寫過一些getelementundermouse之類的函式,要用到座標換算而顯得有些麻煩 特別是當元素有 transform的時候 今天看到mouse類居然有乙個directlyover屬性,可以獲得滑鼠下的元素,很奇怪,我...