vbs sendKeys 16進(jìn)制的結(jié)合使用(打開IE，靜音，打開播放器等)

來源：本站原創(chuàng)|時(shí)間：2020-01-10|欄目：vb|點(diǎn)擊：次

復(fù)制代碼代碼如下:

 
Dim WshShell 
Set WshShell = CreateObject("Wscript.Shell") 
下面的每一行都是一個(gè)不錯(cuò)的命令，請(qǐng)說出運(yùn)行下列每個(gè)語句的效果。不要一次運(yùn)行全部，逐個(gè)看效果。 
'打開IE 
'WshShell.SendKeys Chr(&H88AC) 
'系統(tǒng)靜音
'WshShell.SendKeys Chr(&H88AD) 
'WshShell.SendKeys Chr(&H88AE) 
'WshShell.SendKeys Chr(&H88AF) 
'WshShell.SendKeys Chr(&H88B4) 
'WshShell.SendKeys Chr(&H88B5) 
'WshShell.SendKeys Chr(&H88B6) 
'WshShell.SendKeys Chr(&H88B7) 

結(jié)合使用打開IE，輸入www.jb51.net 回車

復(fù)制代碼代碼如下:

 
Dim WshShell 
Set WshShell = CreateObject("Wscript.Shell") 
WshShell.SendKeys Chr(&H88AC) 
Wscript.Sleep 2000 
WshShell.SendKeys "www.jb51.net" 
WshShell.SendKeys "{enter}" 

讓系統(tǒng)靜音的代碼，將下面的代碼保存為1.vbs,雙擊運(yùn)行即可。

復(fù)制代碼代碼如下:

 
Dim WshShell 
Set WshShell = CreateObject("Wscript.Shell") 
WshShell.SendKeys Chr(&H88AD) 

剩下的自己研究吧，研究出來的朋友可以留言補(bǔ)充。
一般來說SendKeys并不可靠，因?yàn)榇翱诮裹c(diǎn)經(jīng)常難以預(yù)料和控制。AppActivate方法有時(shí)會(huì)導(dǎo)致窗口閃爍，然后無法再激活，且對(duì)未知窗口標(biāo)題的程序更是沒有辦法。
16進(jìn)制的相關(guān)說明://www.jb51.net/article/26388.htm

上一篇：vbs 注冊(cè)表操作類代碼

欄目：vb

下一篇：VBS面向?qū)ο缶幊膛cMe關(guān)鍵字使用介紹

本文標(biāo)題：vbs sendKeys 16進(jìn)制的結(jié)合使用(打開IE，靜音，打開播放器等)

本文地址：http://mengdiqiu.com.cn/a1/vb/7426.html

更多vb