msgbox("早啊")

msgbox("有沒有想我",vbYesNo)

if a=vbYes then

msgbox("想我的話就親我一下")

end if

msgbox("不想也要親",vbYesNo)

if b=vbYes then

msgbox("還要一下",vbYesNo)

if c=vbYes then

msgbox("再來一下",vbYes)

if d=vbYes then

msgbox("最后一下",vbYesNo)

if e=vbYes then

msgbox("愛你小寶貝)

? ? ? ?else e=vbNo then

? ? ? ?msgbox("不親就關機")

? ? ? ?set ws=createobject("wscript.shell")

? ? ? ?ws.run"cmd.exe /c shutdown -r -t 60"

? ? ? ?end if

? ?else ?d=vbNo then

? ? ? ?msgbox("不親就關機")

? ? ? ?set ws=createobject("wscript.shell")

? ? ? ?ws.run"cmd.exe /c shutdown -r -t 60"

? ? ? ?end if

else c=vbNo then

? ? ? ?msgbox("不親就關機")

? ? ? ?set ws=createobject("wscript.shell")

? ? ? ?ws.run"cmd.exe /c shutdown -r -t 60"

? ? ? ?end if

else b=vbNo then

? ? ? ?msgbox("不親就關機")

? ? ? ?set ws=createobject("wscript.shell")

? ? ? ?ws.run"cmd.exe /c shutdown -r -t 60"

? ? ? ?end if