Returncode: Auswertung einer MessageBox

Returncode, Programmierung MsgBox
Private Sub cmdAuswertung_Click()
Dim ret As Integer Returncode.
ret = MsgBox("Bitte wählen Sie", 32 + 4, "Auswahl")
If ret = 6 Then
  MsgBox "Jawoll", 48 + 0, "JA"
Else
  MsgBox "Niemals", 16 + 0, "Nee"
End If
End Sub

Auswertung einer MessageBox Auswahl ja nein MessageBox: Ja MessageBox: Nein

Mehr Tipps: Abbruch nach drei Versuchen

Sponsoren und Investoren

Sponsoren und Investoren sind jederzeit herzlich willkommen!
Wenn Sie die Information(en) auf dieser Seite interessant fanden, freuen wir uns über eine kleine Spende. Empfehlen Sie uns bitte auch in Ihren Netzwerken (z. B. Twitter, Facebook oder Google+). Herzlichen Dank!

Nutzen Sie unsere Suchfunktion:

Nach oben Sitemap
Impressum Datenschutz

Hinweis: Diese Webseite kann Werbeanzeigen und Werbeeinblendungen oder eingebundene Links von Diensten und Inhalten Dritter enthalten. Beachten Sie dazu unsere Datenschutzerklärung.