怎麼自己編譯一個滑鼠點擊器

㈠ VC++開發的滑鼠點擊器，他給我了源碼和頭文件，兩個都是一行行的代碼，但我完全不懂，怎麼讓它運行

下載一個visual studio2013，版本你自己選吧，里邊新建工程，選擇vc++類的，然後進去編譯就可以了。

㈡ 用C語言寫一個控制滑鼠鍵盤自動點的程序復雜嗎

很簡單，大概說一下思路
1、獲得指定進程名字的窗口句柄
2、獲得制定窗口的位置
3、計算滑鼠應該在德位置（相對窗口的位置）
4、發送鍵盤滑鼠消息

㈢ 按鍵精靈如何製作滑鼠點擊器

左鍵雙擊（左鍵單擊的不好使）相當於點擊10次左鍵，左鍵按下相當於點擊20次左鍵的代碼：
Dim
Click
Do

Click
=
WaitClick()

If
Click
=
32771
Then

LeftClick
10

ElseIf
Click
=
32769
Then

LeftClick
20

End
If
Loop

㈣ 易語言怎麼製作滑鼠連點器，最好代碼和圖，做好的也行，要是.c

模擬滑鼠點擊()
延遲(1000)
加這兩個命令就可以，我身邊現在沒電腦

㈤ 怎麼用易語言編寫滑鼠連點器

准備一個標簽1,時鍾1(熱鍵以F6為例)

.版本 2
.支持庫 shellEx

.程序集 _啟動窗口程序集
.程序集變數 熱鍵標識

.子程序 __啟動窗口_創建完畢

熱鍵標識1 ＝ 注冊熱鍵 (取窗口句柄 (), 標簽1.取窗口句柄 (), 0, #F6鍵)'0表示沒有功能鍵,1表示Ctrl,2表示Shift

.子程序 _標簽1_反饋事件, 整數型
.參數 參數一, 整數型
.參數 參數二, 整數型

.如果 (參數一 ＝ 熱鍵標識1)
時鍾1.時鍾周期 = 100

.否則

.子程序 _時鍾1_周期事件

模擬滑鼠點擊 (取滑鼠水平位置 (), 取滑鼠垂直位置 (), 0)

㈥ VB 製作一個滑鼠自動點擊器

這個程序還需要麼？滑鼠鉤子

㈦ 我想要製作個 滑鼠自動點擊器

Declare Function GetPrivateProfileString& Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String)
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)

Const MOUSEEVENTF_LEFTDOWN = &H2 ' left button down
Const MOUSEEVENTF_LEFTUP = &H4 ' left button up

程序中
SetCursorPos 455, 234 '你所需要點的位置
mouse_event MOUSEEVENTF_LEFTDOWN Or MOUSEEVENTF_LEFTUP, 0&, 0&, 0&, 0& '模擬滑鼠點擊

如果要模擬鍵盤操作就換一個函數
換成keyboard_event

㈧ 易語言怎麼製作滑鼠左鍵連點器

.支持庫 eAPI

.程序集 窗口程序集1

.子程序 _按鈕1_被單擊

時鍾1.時鍾周期 ＝ 10

.子程序 _時鍾1_周期事件

模擬滑鼠點擊 (, , 0)
' 坐標自己天哈。不懂看下提示。

一個時鍾，一個按鈕，一句命令。簡單。

㈨ 易語言滑鼠連點器製作詳細點的，最好有圖片。

.版本
2
.支持庫
eAPI
.程序集
窗口程序集1
.子程序
_按鈕1_被單擊
時鍾1.時鍾周期
＝
10
.子程序
_時鍾1_周期事件
模擬滑鼠點擊
(,
,
0)
'
坐標自己天哈。不懂看下提示。
一個時鍾，一個按鈕，一句命令。簡單。

㈩ 做個滑鼠點擊器，求高手代碼

Option Explicit
Private Declare Function SetCursorPos Lib "user32" (ByVal x As Long, ByVal y As Long) As Long
Private Declare Function timeGetTime Lib "winmm.dll" () As Long
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Private Type POINTAPI
x As Long
y As Long
End Type
Private 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)
Private Const MOUSEEVENTF_LEFTDOWN = &H2
Private Const MOUSEEVENTF_LEFTUP = &H4

Private Sub Command1_Click()
SetCursorPos X1, Y1 '滑鼠位置X1 Y1,自己填上
mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0
mouse_event MOUSEEVENTF_LEFTUP, 0, 0, 0, 0

Delay 10000 '延時10秒

SetCursorPos X2, Y2 '滑鼠位置X2 Y2,自己填上
mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0
mouse_event MOUSEEVENTF_LEFTUP, 0, 0, 0, 0
End Sub

Private Sub Command2_Click()
End
End Sub

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 112 Then '按F1啟動
Command1_Click
ElseIf KeyCode = 121 Then 'F10停止
Command2_Click
End If
End Sub

Private Sub Form_Load()
KeyPreview = True
End Sub
Private Function Delay(Num As Long) As Long '延時程序
Dim t As Long
t = timeGetTime
Do
DoEvents
Loop Until timeGetTime - t >= Num
End Function

至於循環100次的自己寫