冰楓論壇

標題: 請大大交一下 Vb6的偵測編輯!!! [打印本頁]

作者: s9401005 時間: 2013-6-3 20:46
標題: 請大大交一下 Vb6的偵測編輯!!!
偵測的每次都錯誤
Private Sub Command1_Click() 這句
剛剛看了
http://www.bingfong.com/thread-16186-1-1.html
這篇
有人回答說

要兩個 If FindGame("MapleStory.exe") = True Then(第一個 IF)
If hProcess <> 0 Then (第二個IF)
所以你後面要打 END IF
END IF
(2次)

於是我用了
Private Sub Command1_Click()
If FindGame("MapleStory.exe") = True Then End If
Call InitAutoAsm(dwProcId)
GetWindowThreadProcessId hwd, pid
hProcess = OpenProcess(PROCESS_ALL_ACCESS, False, pid)
If hProcess <> 0 Then End If
MsgBox "偵測成功", , "系統訊息"

Else
MsgBox "偵測失敗", , "系統訊息"
End If
End Sub

修改成這樣
可是還是錯誤
他說
Private Sub Form_Load()
編輯錯誤
沒有定義的Sub 或 Function

-------------------------------------------------------------
不知道該怎麼辦!!

作者: vantseng 時間: 2013-6-3 23:23
本帖最後由 vantseng 於 2013-6-3 23:25 編輯

Private Sub Command1_Click()

If FindGame("MapleStory.exe") = True Then
Call InitAutoAsm(dwProcId)
GetWindowThreadProcessId hwd, pid
hProcess = OpenProcess(PROCESS_ALL_ACCESS, False, pid)
If hProcess <> 0 Then
MsgBox "偵測成功", , "系統訊息"
Else
MsgBox "偵測失敗", , "系統訊息"
End If
End If
End Sub

根據你的內容稍做修改
你的最大問題是連VB的語法都不會用吧

作者: s9401005 時間: 2013-6-4 19:19
回覆 2# vantseng

已經弄好囉謝謝我是請問別人是用其他方法!

作者: s9401005 時間: 2013-6-4 19:20
回覆 2# vantseng

也謝謝你的解答!

作者: 韓小柒 時間: 2013-6-25 17:01
ㄜ .. 不只這樣 / 還要模組噢！

取得遊戲進程《OP》.rar (2.3 KB, 下載次數: 22, 售價: 5 楓幣)

作者: 漢堡 時間: 2014-3-16 21:21
提示: 作者被禁止或刪除內容自動屏蔽

作者: 漢堡 時間: 2014-3-16 21:22
提示: 作者被禁止或刪除內容自動屏蔽

作者: 漢堡 時間: 2014-3-16 21:23
提示: 作者被禁止或刪除內容自動屏蔽

歡迎光臨冰楓論壇 (https://bingfong.com/)