新宝来大灯远光调节图:请高手帮忙看看这个脚本为什么总提示缺少语句 End If

来源:百度文库 编辑:高校问答 时间:2024/05/03 00:46:49
Sub Attack()'攻击怪物函数
Dim cc,kk
cc=0
AddBlood
Delay 50
Do While IsMousePic(Path + "\images\大唐豪侠鼠标武器.bmp")=1 '通过判断鼠标是否变化确定鼠标位置是否为怪物!
For kk=0 To 1
Delay 100
If IsMousePic(Path+"\Images\大唐抓取.bmp")=1 Then LeftClick 1
Do While IsMousePic(Path + "\images\大唐豪侠鼠标武器.bmp")=1
End If

Next
If cc=1 Then Exit Do
LeftClick 1
IsAttack=0
For i=0 To 2
AddBlood
Next
Loop
End Sub
[MainEnd]
[VBSLib]
\MyLib\Default.Txt
[EndVBSLib]

If cc=1 Then Exit Do
LeftClick 1
这个IF的END IF 在哪/??