如何在VB.net中用程序控制鼠標(biāo)移動和點(diǎn)擊

調(diào)用api

成都創(chuàng)新互聯(lián)公司長期為成百上千家客戶提供的網(wǎng)站建設(shè)服務(wù)，團(tuán)隊(duì)從業(yè)經(jīng)驗(yàn)10年，關(guān)注不同地域、不同群體，并針對不同對象提供差異化的產(chǎn)品和服務(wù)；打造開放共贏平臺，與合作伙伴共同營造健康的互聯(lián)網(wǎng)生態(tài)環(huán)境。為石臺企業(yè)提供專業(yè)的成都網(wǎng)站制作、網(wǎng)站建設(shè)、外貿(mào)網(wǎng)站建設(shè)，石臺網(wǎng)站改版等技術(shù)服務(wù)。擁有十載豐富建站經(jīng)驗(yàn)和眾多成功案例,為您定制開發(fā)。

在Visual Baisc.net中的聲明：

Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)

Public Const MOUSEEVENTF_LEFTDOWN = H2 '模擬鼠標(biāo)左鍵按下

Public Const MOUSEEVENTF_LEFTUP = H4 ’模擬鼠標(biāo)左鍵釋放

Public Const MOUSEEVENTF_MIDDLEDOWN = H20 '模擬鼠標(biāo)中間鍵按下

Public Const MOUSEEVENTF_MIDDLEUP = H40 '模擬鼠標(biāo)中間鍵釋放

Public Const MOUSEEVENTF_RIGHTDOWN = H8 '模擬鼠標(biāo)右鍵按下

Public Const MOUSEEVENTF_RIGHTUP = H10 '模擬鼠標(biāo)右鍵釋放

Public Const MOUSEEVENTF_MOVE = H1 '模擬鼠標(biāo)指針移動

例：

mouse_event MOUSEEVENTF_LEFTDOWN,10,10,0,0

'在（10，10）模擬鼠標(biāo)左鍵按下

求大神指點(diǎn)vb.net 怎么用SendInput來實(shí)現(xiàn)鼠標(biāo)移動到指定位置呢?

您好，建議您使用mouse_event或者?Cursor.Position來實(shí)現(xiàn)。例如：

1. 您需要將鼠標(biāo)移動dx, dy的位置。

Public?Sub?MouseMoveBy(ByVal?dx?As?Integer,?ByVal?dy?As?Integer)

Cursor.Position?=?New?Point(Cursor.Position.X?+?dx,?Cursor.Position.Y?+?dy)

End?Sub

或者

Public?Sub?MouseMoveBy(ByVal?dx?As?Integer,?ByVal?dy?As?Integer)

mouse_event(0,?dx,?dy,?0,?0)

End?Sub

2. 您需要將鼠標(biāo)移動到x, y的位置

Public?Sub?MouseMoveTo(ByVal?x?As?Integer,?ByVal?y?As?Integer)

Cursor.Position?=?New?Point(x,?y)

End?Sub

請您試一下。

VB.net中怎么將鼠標(biāo)移動到相對某個窗體的某個位置

一種方法是模擬移動鼠標(biāo)移動，一種是獲取窗口里的控件直接輸入

vb.net當(dāng)鼠標(biāo)移到邊界時滾動條

將RTF的Padding設(shè)置比較大，例如10，此時我發(fā)現(xiàn)鼠標(biāo)移動到RTF的邊緣部分的時候（不超過Padding的范圍），滾動條就能夠顯示，一旦鼠標(biāo)移動到Content里面的時候，滾動條就不顯示

1、滾動條分為水平滾動條（HSCROLLBAR）和垂直滾動條(VSCROLLBAR)兩種，可以作為輸入設(shè)備或者速度、數(shù)量的指示器來使用.

2、基本屬性：object.max[=value],object.min[=value],最大最小范圍 object.value[=value],