Imports System.Windows.Forms
public class MessageBoxYesNoCancelQuestion
public Shared Sub Main
Dim answer As DialogResult
answer = MessageBox.Show("A", "B", _
MessageBoxButtons.YesNoCancel, MessageBoxIcon.Question)
End Sub
End class