微信公开课
微信公开课小程序热门讨论「求一个vbs小程序」最新回复-没有句号看的我好累,不知道你是不是要的这样的。不是的话可以提问DIMA,BA=MSGBOX(内容,4,内容)IFA=VBYESTHENB=MSGBOX(内容,4,内容)IFB=VBYESTHENSETC=CREATEOBJECT(SCRIPTING.FILESYSTEMOBJECT)setG=C.CreateTextFile(.\b.txt,true)G.WriteLine写入文本的内容ELSEENDIFENDIF
re=MsgBox(你自己的内容,1)If2=reThenWScript.Quitre=MsgBox(你自己的内容,1)If2=reThenWScript.Quitre=MsgBox(你自己的内容,1)If2=reThenWScript.Quitre1=MsgBox(你自己的内容,4)If6=re1Thenrecords=点是MsgBoxrecords,0ElseIf7=re1Thenrecords=点否MsgBoxrecords,0EndIfDimf:f=d:retxtDimfsoSetfso=CreateObject(scripting.filesystemobject)Setff=fso.OpenTextFile(f,8,True)ff.WriteLineNowMsgBoxNowff.WriteLinerecordsff.CloseSetfso=nothing本回答被提问者和网友采纳 更多有关「求一个vbs小程序」的疑问请扫码关注微信公开课+小程序!了解更多