1樓:網友
給你個思路吧:
啟動-輸入和密碼-讀取檔案-比對-正確(-錯誤-提示錯誤-返回)裝載下一窗體-讀取記事檔案-放入文字框。
都是些基本的**,很好編。
vb中開啟記事本後,如何讀取裡面的和密碼與外界對應啊
2樓:網友
用檔案讀取函式。順序讀取,在vb中進行判斷。
vb輸入qq帳號和密碼
3樓:好幾碗粥
我剛寫的這個絕對可以用,我已經測試了。shell執行的是快,還沒等qq視窗出來就執行了下面的**了,我又重新改了改,這樣傳送按鍵就絕對發不錯地方了。
迴圈檢測前臺視窗標題,如果是qq視窗的話 就傳送賬號和密碼。
private declare function getforegroundwindow lib "user32" ()as long
private declare function getwindowtext lib "user32" alias "getwindowtexta" (byval hwnd as long, byval lpstring as string, byval cch as long) as long
private sub command1_click()
dim a as long, str as string, qq as string, pid as long
str = space(256)
qq = "d:\tencent\\" 'qq程式的路徑。
pid = shell(qq, vbnormalfocus)
if pid <>0 then
do '迴圈查詢前臺視窗直到是qq的視窗就傳送賬號密碼。
doevents
a = getforegroundwindow()
getwindowtext a, str, 255
loop until left(str, 2) = "qq"
sendkeys "123456" '輸入qq賬號後跟乙個tab切換鍵。
sendkeys "abcde" '輸入qq密碼。
sendkeys "" '按回車鍵登陸。
elsemsgbox "沒有啟動qq"
end if
end sub
4樓:甲蟲
你是要做個qq登入器嗎?如果是的話下面有個程式可以看看。
如果你是想在你的程式裡直接控制qq登入框里加密碼的話,那就不容易啦,反正我是不會了。
vb自動輸入使用者名稱密碼
5樓:網友
你的兩個定時器之間沒有相對的互鎖關係,他們一直在執行。所以i的值一直為1
private sub timer1_timer()if getasynckeystate(115) then= 300
end if
end sub
改為 private sub timer1_timer()if getasynckeystate(115) then= 300
end if
end sub
我暈,跟你說要加定時器1的限制!!!
6樓:網友
i = i + 1
if i = 1 then sendkeys text1
if i = 2 then sendkeys ""
if i = 3 then sendkeys text2
if i = 4 then sendkeys ""
i = 0注意最後的一句,當timer2_timer開始時,i永遠是0,所以後三個if永遠不會被執行,要想正常執行,把i = 0 改成if i >= 4 then i = 0
private declare function getasynckeystate lib "user32" (byval vkey as long) as integer
dim i as integer
private sub command1_click()
end sub
private sub form_load()i = 0
end sub
private sub timer1_timer()
if getasynckeystate(115) then
end if
end sub
private sub timer2_timer()
i = i + 1
if i = 1 then sendkeys text1
if i = 2 then sendkeys ""
if i = 3 then sendkeys text2
if i = 4 then sendkeys ""
if i > 4 then
i = 0 0 '這句一定要加,否則死迴圈,要不把i=0改成i=5也行,只是這樣就會讓timer控制項不停的執行,浪費啊。
end if
end sub
在乙個普通的視窗中測試通過了,我這裡沒有夢幻西遊,不知道夢幻西遊上能不能通過。
從鍵盤輸入一個年份,判斷其是否為閏年 VB
1 開啟visual basic軟體 vb軟體 新建工程,在form1窗體黑點區域雙擊進入form1的區域 2 清空後,就可以編寫 了。這裡在輸入欄中輸入年份,輸入之後點選確定,就會在form1中會顯示出是否閏年。關於閏年的判斷只要滿足能被4整除不能被100整除或者被4和400整除就是達成條件,最後...
請教VB的問題,請教VB的一個問題
mod 取模運算2008 02 26 15 40print 4 mod 3 1 print 4 mod 3 1 print 4 mod 3 1 print 4 mod 3 1 print 7.8 mod 4.56 3 總結 mod就是求餘數或稱取模,結果是兩數相除後的餘數。規則 若參加運算的運算元不...
讓乙個資料夾輸入密碼才能進怎麼設定
不知道你什麼系統,為了方便,建議你 乙個叫巨集傑資料夾加密的小工具很小,安裝後直接指定資料夾加密就行了,而且加密後的資料夾會隱藏,進入加密的資料夾只需要先進入這個小工具輸入密碼就能看到了。資料夾加密碼怎麼設定。一 加密檔案或資料夾 步驟一 開啟windows資源管理器。步驟二 右鍵單擊要加密的檔案或文...