零起點學VB做外掛程式（一）

最近正在玩武林外傳2，有時候太累手了，就用按鍵精靈做了個程式。結果武林外傳2居然查出來了，將號給封了一天。又不太敢down網上的外掛程式，誰知道那個有毒，那個有木馬。看來出路只有一條了，那就是寫自己的外掛程式。

自打上學的時候就不喜歡vc，看著就煩，所以只能從vb下手了。以後有合適的軟體咱再用不遲。

說幹就幹。咱初步的要求不高，只要能夠模擬鍵盤操作就行。從網上看了篇《用vb模擬鍵盤事件的n種方法》，咱不貪心，現從最簡單的全域性級模擬開始好了。

下面就是俺的第乙個程式，vb.net寫的**如下：

public declare sub keybd_event lib "user32" (byval bvk as byte, byval scan as byte, byval dwflags as long, byval dwextrainfo as long)

declare sub sleep lib "kernel32" (byval dwmilliseconds as long)

const keyeventf_keyup = &h2

const vk_0 = 96

const vk_1 = 97

const vk_2 = 98

const vk_3 = 99

const vk_4 = 100

const vk_5 = 101

const vk_6 = 102

const vk_7 = 103

const vk_8 = 104

const vk_9 = 105

const vk_a = 65

const vk_b = 66

const vk_c = 67

const vk_d = 68

const vk_e = 69

const vk_f = 70

const vk_g = 71

const vk_h = 72

const vk_i = 73

const vk_j = 74

const vk_k = 75

const vk_l = 76

const vk_m = 77

const vk_n = 78

const vk_o = 79

const vk_p = 80

const vk_q = 81

const vk_r = 82

const vk_s = 83

const vk_t = 84

const vk_u = 85

const vk_v = 86

const vk_w = 87

const vk_x = 88

const vk_y = 89

const vk_z = 90

const vk_window = 91

private sub button1_click(byval sender as system.object, byval e as system.eventargs) handles button1.click

call keybd_event(vk_window, 0, 0, 0) '按下window鍵

call keybd_event(vk_f, 0, 0, 0) '按下r鍵

call sleep(1000) '延時500毫秒

call keybd_event(vk_f, 0, keyeventf_keyup, 0) '釋放r鍵

call keybd_event(vk_window, 0, keyeventf_keyup, 0) '釋放window鍵

end sub

private sub button2_click(byval sender as system.object, byval e as system.eventargs) handles button2.click

endend sub

這是第一步的學習。應該都看的懂。呵呵。好，今天收工了。

零起點學VB做外掛程式（一）

零起點學演算法68 刪除字元

零起點學演算法104 第幾天？

1171 零起點學演算法78 牛牛

零起點學VB做外掛程式（一）

零起點學演算法68 刪除字元

零起點學演算法104 第幾天？

1171 零起點學演算法78 牛牛

相關推薦