DialogResult.Abort : DialogResult « System.Windows.Forms « VB.Net by API

1. VB.Net by API
2. System.Windows.Forms
3. DialogResult

DialogResult.Abort

  

Imports System.Windows.Forms

Public Class Test
    Public Shared Sub Main
        Dim drResult As DialogResult
        drResult = MessageBox.Show("Q?", "Sample", MessageBoxButtons.RetryCancel)
    
        If drResult = DialogResult.Retry Then
          Console.WriteLine("Retry")
        Else
          Console.WriteLine("Cancel")
        End If
    
        Select Case MessageBox.Show("Bad stuff happened","Long Process", MessageBoxButtons.AbortRetryIgnore)
          Case DialogResult.Abort
            Console.WriteLine("abort")
          Case DialogResult.Retry
            Console.WriteLine("retry")
          Case DialogResult.Cancel
            Console.WriteLine("cancel")
          Case Else
            Console.WriteLine("Else")
        End Select
    End Sub

End Class

   
    
  

Related examples in the same category