主题：关于MessageBox的一个问题

Dim Result As DialogResult
Result = MessageBox.Show("Visual Basic一点不难，是不是？", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
    MessageBox.Show("不错，说明你已经认真学习了。","提示")
Else
    MessageBox.Show("好好学习吧，你会认同这个看法的。","提示")
End if