如何用vbs将输出内容写到屏幕上

这篇文章主要讲解了“如何用vbs将输出内容写到屏幕上”,文中的讲解内容简单清晰,易于学习与理解,下面请大家跟着小编的思路慢慢深入,一起来研究和学习“如何用vbs将输出内容写到屏幕上”吧!

Set objExplorer = CreateObject("InternetExplorer.Application")
objExplorer.Navigate "about:blank"   
objExplorer.ToolBar = 0
objExplorer.StatusBar = 0
objExplorer.Width = 400
objExplorer.Height = 200 
objExplorer.Left = 0
objExplorer.Top = 0
Do While (objExplorer.Busy)
    Wscript.Sleep 200
Loop    
objExplorer.Document.Title = "Process Information"   
objExplorer.Visible = 1  
objExplorer.Document.Body.InnerHTML = "Retrieving process information." 
Wscript.Sleep 2000
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Process")
For Each objItem in colItems
    objExplorer.Document.Body.InnerHTML = objItem.Name
    Wscript.Sleep 500
Next
objExplorer.Document.Body.InnerHTML = "Process information retrieved."
Wscript.Sleep 3000
objExplorer.Quit

感谢各位的阅读,以上就是“如何用vbs将输出内容写到屏幕上”的内容了,经过本文的学习后,相信大家对如何用vbs将输出内容写到屏幕上这一问题有了更深刻的体会,具体使用情况还需要大家实践验证。这里是亿速云,小编将为大家推送更多相关知识点的文章,欢迎关注!