Question

求一个vbs小程序

要有一个对话框（有字），有确定和取消，点确定弹出下一个对话框，取消则退出程序，如此三个对话框（字不同），然后是一个有字的对话框有是和否，点是或否弹出的对话框不同，同时在别处生成一个txt，里面写着日期和刚才点的是或否（是追加，若文件不存在则创建），txt最好没有后缀，有也行。
对话框里面的字我自己写
本人不想看vbs的语法，所以请各位大虾帮忙

Answer 1

没有句号看的我好累，不知道你是不是要的这样的。不是的话可以提问

DIM A,B
A=MSGBOX("内容",4,"内容")
IF A=VBYES THEN
B=MSGBOX("内容",4,"内容")
IF B=VBYES THEN
SET C = CREATEOBJECT("SCRIPTING.FILESYSTEMOBJECT")
set G = C.CreateTextFile(".\b.txt", true)
G.WriteLine "写入文本的内容"
ELSE
END IF
END IF

Answer 2

re=MsgBox ("你自己的内容",1)
If 2=re Then WScript.Quit
re=MsgBox ("你自己的内容",1)
If 2=re Then WScript.Quit
re=MsgBox ("你自己的内容",1)
If 2=re Then WScript.Quit
re1=MsgBox ("你自己的内容",4)
If 6=re1 Then
records="点是"
MsgBox records,0
ElseIf 7=re1 Then
records="点否"
MsgBox records,0
End If

Dim f:f="d:\retxt"

Dim fso
Set fso = CreateObject("scripting.filesystemobject")
Set ff=fso.OpenTextFile(f,8,True)
ff.WriteLine Now
MsgBox Now
ff.WriteLine records
ff.Close
Set fso=nothing