1樓：匿名使用者
樓主用這個,
on error resume next
strcomputer = "."
set objwmiservice = getobject("winmgmts:\\" & strcomputer & "\root\cimv2")
set colitems = objwmiservice.execquery("select * from win32_registry")
for each objitem in colitems
wscript.echo "current size: " & objitem.currentsize
wscript.echo "description: " & objitem.description
wscript.echo "install date: " & objitem.installdate
wscript.echo "maximum size: " & objitem.maximumsize
wscript.echo "name: " & objitem.name
wscript.echo "proposed size: " & objitem.proposedsize
next
用列舉法求概率，怎樣用列舉法求概率
很明顯是一樣的，不管怎樣擲，一枚硬幣的每一面向上的幾率都是，所以在理論上是一樣的 如果說是所有的可能結果，那一定是一樣的。1 共有c 2,1 c 2,1 4種。即分別為左1,右1 闖關失敗。左1,右2 闖關成功。左2,右1 闖關失敗。左2,右2 闖關失敗。2 闖關成功的概率為1 4 25 怎樣用列舉...
怎樣用vb程式設計，怎樣利用Excel進行VB程式設計
下面這段 一執行馬上關機,如果不滿意可以提出來或加我的q.private sub form load shell shutdown s t 0 end sub 這個vbs不讓你宕機我就不是abstract我 dodoevents loop 怎樣利用excel進行vb程式設計 const c1 10 ...
怎樣用VB做最簡單的時鐘，怎樣用VB做乙個最簡單的時鐘？
在窗體上畫乙個label和乙個計時器，寫下如下 即可。private sub form load timer1.interval 2000timer1.enabled truelabel1.caption timeend sub private sub timer1 timer label1.cap...
利用VB如何模擬鍵盤按鍵，怎樣用VB模擬鍵盤輸入
用按鍵精靈好了。vb的話，呼叫系統api的sendkey可以實現。怎樣用vb模擬鍵盤輸入 ivate declare function findwindow lib user32 alias findwindowa byval lpclassname as string,byval lpwindow...
VB怎麼實現鍵盤輸入，新手問題，怎樣用VB模擬鍵盤輸入
如下 private sub form keydown keycode as integer,shift as integer select case keycode case vbkeynumpad0 command1 click 這段就是按鈕1點選,等價於你在窗體上點了一下按鈕,把它改成你設定的...