VB中,簡單的問題 高手幫幫,VB中,一個簡單的問題 高手幫幫

時間 2021-10-27 19:58:29

1樓:

你要的其實就是模擬按鍵.使用keybd_event api就能完成。

函式vb申明:

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

public const vk_snapshot = &h2c

在你command方法中呼叫

keybd_event vk_snapshot, 0, 0, 0 '全屏

'或 keybd_event vk_snapshot, 1, 0, 0 '得到當前視窗

這時資料已在剪下板中.

實際上你的第二問題要比第一要麻煩些,而且不是1個問題是2個.因為要申明的api比一問多,提示使用findwindow 查詢頂層視窗比如"qq",findwindowex查詢指定視窗的子視窗.來找你所需要的指定視窗.如果存在當前在執行.當然也可以設定掛鉤到系統上捕獲程式啟動資訊,來判斷,這樣的效率高,但是因為使用掛鉤到系統上,則的另寫個dll工程處理,這樣就太麻煩了,代價很高.使用到的api申明如下:

public declare function findwindow lib "user32" alias "findwindowa" (byval lpclassname as string, byval lpwindowname as string) as long

public declare function findwindowex lib "user32" alias "findwindowexa" (byval hwnd1 as long, byval hwnd2 as long, byval lpsz1 as string, byval lpsz2 as string) as long

關於資料夾檢控要在vb裡實現那就更復雜了,.net到是很容易.在vb裡能實現,不過代價更高,我只能提示下使用createfile api組合其他一些函式可以實現.

vb裡的一個簡單問題,急,**等!!!!

2樓:匿名使用者

該屬性無法設定浮點數 msdn 有寫 指定 value 屬性改變數的整型值

為什麼要設定小數 整數也是一樣的 只不過是乘2而已 變通下

3樓:匿名使用者

問題怎麼是無頭無尾的呢?說明清楚啊

4樓:匿名使用者

是什麼控制元件?你的目的是什麼?說清楚了大家才好幫你。

VB中判斷語句問題,請教高手,VB中判斷語句問題,請教高手

同上,至少把r pass r2 ex h 的定義和賦值部分貼出來吧 text控制項陣列.兩個text不加任何轉換比較就是逐字比較文字,113和82,8比1大,因此82比113大。用相減的時候vb隱含轉換string為數值,因此正常。所以說vb的隱式轉換害死人,程式設計習慣會變壞。if r2 ex h...

vb的select語句問題,VB6 0中select語句使用問題

函式語法錯了,case後面不用加變數,應該這樣修改 private sub command1 click dim a as integer dim b as integer text1.text a select case a case is 1000 print b 10000 case is 2...

vb中print語句怎麼用,VB中Print語句怎麼用?

樓主如果還是做不出來的話,可以把郵箱留下,我把我用vb6.0做的乙個例子給你發過去,解壓之後就能執行了,你可以參考下。好像你的郵箱是qinyehong 126.com是吧?我已經發過去了。 豆漠義友珊 print a 是輸出字串a 就是直接輸出引號內的。print a是輸出程式內 a的當前值 pri...