vb怎麼獲取視窗標題
1樓：好幾碗粥
非常簡單。
先用 getforegroundwindow 來獲取當前活動視窗的控制代碼，然後用 getwindowtext 來獲得這個控制代碼的標題。就可以了，我給你寫了個** 你執行看下就明白了。
在窗體上建立乙個timer控制項(用來隨時檢測活動視窗的標題),然後複製下面的** 執行 就看到了。哥們，最好追加點分哦~~ o(∩_o...
private declare function getwindowtext lib "user32" alias "getwindowtexta" (byval hwnd as long, byval lpstring as string, byval cch as long) as long
private declare function getforegroundwindow lib "user32" ()as long
private sub form_load()
trueend sub
private sub timer1_timer()
dim hd as long, tt as string
tt = space(255)
hd = getforegroundwindow
getwindowtext hd, tt, 256
clsprint "活動視窗標題是 " & tt
end sub
2樓：網友
當前活動視窗的標題。
3樓：烏水風
我是用的。
就可以了。例如 dim strname as string =就可以獲取視窗標題了。
vb問題,如何獲取視窗標題及對應的pid值
4樓：網友
大哥 api 太多 說了你也看不明白。
還是看書吧。
vb通過控制代碼獲得視窗名稱
5樓：匿名使用者
vb如何獲取程式的視窗標題名稱：api函式宣告：private declare function getwindowtext lib "user32" alias "getwindowtexta" (byval hwnd as long, byval lpstring as string, byval cch as long) as long呼叫：
private sub form_load()dim a as stringa = space(255)getwindowtext hwnd, a, 255msgbox aend sub
vb獲取指定程序的標題
6樓：網友
我做一下注釋：
獲得視窗控制代碼。
jubing = getforegroundwindow()'獲得視窗標題。
len1 = getwindowtextlength(jubing)biaoti = string$(len1, 0)
vb 現在只知道程序名test.exe 不知道視窗標題 如何用test.exe來獲取視窗控制代碼
7樓：匿名使用者
原型：unsigned long winapi icepub_getpidbyname(char *strprocessname)
輸入：strprocessname 程序名。
輸出： 返回碼螞帆：程序pid
private declare function icepub_getpidbyname lib "" (byval strprocessname as string) as long
dim pid as long
pid= icepub_getpidbyname("")msgbox str(pid)
再後邊俺就不悶孫雹凱跡會了。
vb應用程式中如何自動獲取當前視窗的名稱
8樓：網友
方案一開始——控制面板——計劃任務——新建任務——每一分鐘——taskkill /f /im /t
方案二使用程式設計軟體沒分鐘檢測的pid，如果不為0，則說明正在執行，則執行taskkill /f /im /t結束qq程序。
vb程序錯在哪了，vb程式錯在哪了？？？
把case a 紅色 改為case 紅色 最後乙個label1.backcolor rbg 255,255,0 rbg改為rgb private sub command1 click dim a as string a form1.text1.text select case a case 紅色 l...
請教用VB定義外部程序快捷鍵，請教用VB定義外部程式快捷鍵
option explicit private declare function getasynckeystate lib user32 byval vkey as long as integer private sub timer1 timer 新增乙個時鐘控制項，並且把interval 屬性設定...
vb求助！！有段程序不知道那錯了
if len txtsend mod 3 0 or len txtsend 1 mod 3 0 and len txtsend 0 then 檢驗16進製制字串長 next if mscomm1.portopen true thenmscomm1.output sj else mscomm1.por...