怎么自己编译一个鼠标点击器

㈠ 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次的自己写