>>507
Sub Benkyou
If MsgBox("問題") = vbSeikai Then
  MsgBox "○"
Else
  MsgBox "×"
End If
End Sub