1樓:謝億輝
是想整人嗎?
dim aa=10 set objshell = createobject("")
shutdown -s -t 10",,trueset s = createobject("")while a
aa = a - 1
100wend createobject("").speak "bomb?"磨鄭。
儲存為**.vbs
開啟後語音10秒瞎知頌倒計時關機猛者。
求高手製作乙個vbs視窗
2樓:**聖使
".write "體_gb2312'>想明白生命的意義嗎?想真正的活著嗎?
.write "
write ""
write " "
write "
write "
end with
set wnd=
set id=
y")o")
n")do while true
200loop
sub event_onquit 'ie退出事件處理過程'
end sub
sub yshuju("yes")
end sub
sub oshuju("or")
end sub
sub nshuju("no")
end sub
sub shuju(canshu)
msgbox "你按了:"&canshu
end sub『試試。
3樓:網友
樓上用html做介面啊,有時候會打不開,樓主最好用vb.
怎麼做vbs詢問視窗
4樓:網友
if msgbox("確定要關機嗎?",vbyesno,"提示")=vbyes then
你要執行的命令。
else'選擇否 執行的**。
end if
**如上 其他部分自行新增。
vbs設定若干秒後顯示下乙個視窗
5樓:鄙人_焉哉乎也
這個用 就可以了。
簡單示例如下:
option explicit
const int_delay = 5
dim objshell
set objshell = createobject("")"hello...", int_delay, "^o^", vbokonly
msgbox "nice to meet you...", vbokonly, ":-)"
set objshell = nothing
如何vbs指令碼實現對指定對話方塊視窗偵測和選項操作
6樓:網友
你如果用qtp(程式語言。
也是vbs)的話,直接有個winexist()方法判斷視窗是否存在。但vbs中沒有這個方法,只能通過appactivate方法返回的布林值。
來判斷應用啟用是否成功。如果對話方塊存在,則一定會返回true,表示啟用成功。基於這個思路:
on error resume next
count = 0
set wshshell = "")
do while count < 15
ret = "test")
if ret then
通過tab鍵切換到"cancel"按鈕。
'點選"cancel"
exit do
count = count + 1
end if
loop
7樓:網友
只要電腦裝了word就行。
set objword = createobject("")set coltasks =
for each objtask in coltasksif and "test" then
ret = "test")
if ret then
通過tab鍵切換到"cancel"按鈕。
'點選"cancel"
end if
end if
next
vbs高手請進…(求一段很簡單的vbs程式)
8樓:網友
'set fs = createobject("")filepath = "c:\"
if then
msgbox "file existed"
end if
3createfolders(filepath)set ts = , true)
4firstname = ""
lastname = ""
lastnameflag = false
for x=0 to - 1
if = "/firstname" then上面的解釋及例子。
是我從書上看到的。
大概就這樣,有些東西我也沒搞清楚。
請高手幫我寫乙個簡單的vbs指令碼**,,
9樓:網友
dim s
do until s=10000
s=s+1msgbox "哥們,給我按10000次回車吧",64loop
這個要一直按著回車。
批處理 cscript呼叫乙個vbs指令碼,執行完畢會彈出視窗,需要按回車鍵的命令
10樓:
在vbs指令碼中使用:
set wshshell = createobject("")"請等待1秒鐘,1秒後該視窗自動關閉", 1, "定時自動關閉提示框"
這個來做彈出視窗,1秒後自動往下走。
vbs視窗獲取焦點,高手們請指教!
11樓:網友
dim wshshell
set wshshell="")
notepad"
4000 "!這時把游標移到另外乙個視窗。
無標題 - 記事本"
500"aadsfadfadbsvzxcv"
12樓:大神
改成這樣就可以了。
dim wshshell
set wshshell="")
notepad"
無標題 - 記事本"
500"aadsfadfadbsvzxcv"
基金 請高手給我基金乙個簡單的解釋
道理是差不多的,只不是 存在一定的風險性,如果盈利的話利潤也比銀行利息高,看好乙隻 可以長期持有,短期內是看不到很大收益的,可以放上兩三年。你的理解是正確的。不過,銀行主要靠放貸賺錢,的回報可能是負回報。銀行肯定是固定收益。聽說過負利率嘛?在通貨膨脹下,現在的利率實質是負利率。也就是,把錢放在銀行裡...
如何做簡單的植物標本,如何做乙個簡單的植物標本
材料用具 採集來的植物,舊報紙或草紙,刷子或紗布,標本夾或兩塊比台紙大一些的木板和書,吸水紙或棉絮,台紙,標籤,膠水,膠帶或縫衣針和線,毛筆,刀片,剪刀,玻璃紙。製作方法 從採集來的同一種植物中選擇各個器官最完備的做標本。用刷子或紗布擦掉標本上的汙物,保持標本清潔美觀。把整理好的標本夾在乾燥的舊報紙...
關於乙個簡單的程式除錯 跪求高手解答
函式申明那筆誤了 執行結果不對。可能是 型別和儲存的問題!望高手再指點一下!在程式的除錯過程 現了哪些問題你是如何解決的 你好,很高興回到你的問題。在程式的除錯過程中一些常見的除錯問題和解決方法如下 語法錯誤 在程式設計中常常出現的錯誤,特別是在編寫 時出現的錯誤。常見的語法錯誤包括拼寫錯誤 缺少括號或...