System Windows Forms VB.Net by API

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