如何使用Visual Basic Script (VBS) 调用 PowerShell 命令来捕获屏幕截图并保存为图片文件？

在VBS中调用PowerShell来抓取屏幕截图并保存为图片文件，你需要做的是创建一个VBS脚本，该脚本会启动一个PowerShell进程，并发送命令来捕获屏幕。这里是一个基本示例：

Set objShell = CreateObject("WScript.Shell")
strCommand = "powershell -ExecutionPolicy Bypass -Command ""Import-Module PSReadLine; $image = Get-CimInstance win32_screen -Property WorkingArea | ForEach { New-Object Bitmap $_.WorkingArea }; $image.Save('c:\screenshots\screen.png')"""

objShell.Run strCommand, 0 '0 表示后台运行
WScript.Sleep(5000) '等待几秒让截图生成

'关闭PowerShell进程（这一步不是必需的，但如果需要，可以在适当位置添加）
Set ps = GetObject("winmgmts:\\.\root\cimv2\process")
ps.ExecQuery("select * from Win32_Process where Name like '%powershell%'").Item(0).Terminate()

WScript.Echo "Screenshot saved."

这个脚本首先创建一个PowerShell命令字符串，导入PSReadLine模块（它包含一些图形相关的函数），然后获取屏幕信息并创建一个新的Bitmap对象来保存。最后，将新图保存为PNG文件。