【ブルアカ】ブルーアーカイブ-Blue Archive- ぷにぷに ☆5665

44 ：名無しの先生@アフィ転載禁止【レベル:197】 (ｶﾞｯｻ cMfW-2W/t) (d)：2024/10/11(金) 12:21:22.68 ID:7Glo+cgY

Sub Yumemodoki()
　Dim n As Integer
　Dim m As Integer
　n = 1
　　Do While m < 2
　　　MsgBox "ごめんみんな、" & vbLf & n & "度ならず" & n+1 &"度までも…！"
　　　n = n+1
　　Loop
End Sub