Tag: vbs
do
a=Inputbox("输入画名,输入“退出”退出,画名:下雪了,坐标系,雪人")
if a="下雪了" then
msgbox"☀" & vbcrlf & vbcrlf & vbcrlf & "❃❃❃❃❃❃❃❃❃❃" & vbcrlf & "❃❃❃❃❃❃❃❃❃❃" & vbcrlf & "❃❃❃❃❃❃❃❃❃❃"
else if a="坐标系" then
msgbox" ↑ " & vbcrlf & " ┃6 " & vbcrlf & " ┃5 " & vbcrlf & " ┃4 ┌───┐ " & vbcrlf & " ┃3 │ │ " & vbcrlf & " ┃2 │ │ " & vbcrlf & " ┃1 │ │ " & vbcrlf & " ┃ └── ┘ " & vbcrlf & "━━━━━━━━━━╋━━━━━━━━━━→" & vbcrlf & "-9-8-7-6-5-4-3-2-1 0┃ 1 2 3 4 5 6 7 8 9 " & vbcrlf & " ┃ " & vbcrlf & " ┃-1 " & vbcrlf & " ┃-2 " & vbcrlf & " ┃-3 " & vbcrlf & " ┃-4 " & vbcrlf & " ┃-5 " & vbcrlf & " ┃-6 "
else if a="雪人" then
msgbox"☀" & vbcrlf & vbcrlf & vbcrlf & "☃☃☃☃☃☃☃☃☃☃☃☃☃☃☃" & vbcrlf & "☃☃☃☃☃☃☃☃☃☃☃☃☃☃☃" & vbcrlf & "☃☃☃☃☃☃☃☃☃☃☃☃☃☃☃" & vbcrlf & "☃☃☃☃☃☃☃☃☃☃☃☃☃☃☃" & vbcrlf & "☃☃☃☃☃☃☃☃☃☃☃☃☃☃☃" & vbcrlf & "☃☃☃☃☃☃☃☃☃☃☃☃☃☃☃"
else if a="退出" then
exit do
end if
end if
end if
end if
loop