VB 4/6- und VBA-Forum - Beitragsübersicht -
ThemaVB6: MsgBox abschalten
Von Manni44
E-Mail Manfred-Meyer1944@outlook.de
Datum 04. November 2022 um 12:26:21
Frage Hallo,ich bin 78 Jahre und VB6 ist mein Hobby.
Die MsgBox sollte nur einmal angezeigt werden.
Wenn ich Picture(1) aufrufe usw.dann taucht sie immer wieder auf.
Wie kann das verhindert werden?

Private Sub nachricht()
If Picture1(0) > 1 Then
answer = MsgBox (".......")
If answer = vbOKOnly Then
answer = vbAbort
End If
End If

Picture(1) usw.

End Sub
Antwort:
Von Detlev Schubert
E-Mail ds@vb-fun.de
Datum 18. Februar 2023 um 12:49:35
Antwort Hallo,

wie ich deinem Posting entnehmen kann, hast Du ein Bilder-Datenfeld. Soll die Msg-Box nur einmalig angezeigt werden, egal welches Bild angeklickt wird, kannst du das z.B. mit einer globalen Boolean-Variable handhaben
z.B.:
Global Zaehler As Boolean

Private Sub nachricht()
If Picture1(0) > 1 And Zaehler = False Then
answer = MsgBox (".......")
Zaehler = True
If answer = vbOKOnly Then
answer = vbAbort
End If
End If
Die Variable musst Du dann halt nur irgendwo in Deinem Code wieder zurücksetzen.

Gruß
Detlev
[ Antwort schreiben | Zurück zum VB 4/6- und VBA-Forum | Forum-Hilfe ]
Antworten
VB6: MsgBox abschalten - Manni44 04. November 2022 um 12:26:21
Re: MsgBox abschalten - Detlev Schubert 18. Februar 2023 um 12:49:35

Ihre Antwort
(Nick-)Name   Wichtige Informationen zur Namensangabe
E-Mail (opt.)  Wichtige Informationen zur Angabe einer eMail-Adresse
Thema   Wichtige Informationen zur Angabe eines Themas
Betrifft (IDE)  Visual Basic 6 (*.exe)
Ihre Antwort
Smilies
Mehr...
FettKursivUnterstrichen   Übersicht der Tipp-KürzelÜbersicht der Projekt-KürzelÜbersicht der Bücher-Kürzel 
Homepage
Titel
Root-Smilies              
             
             
[ Zurück zum VB 4/6- und VBA-Forum | Forum-Archiv | Forum-Hilfe | Chat ]

Zum Seitenanfang

Startseite | VB-/VBA-Tipps | Projekte | Tutorials | API-Referenz | Komponenten | Bücherecke | Gewinnspiele | VB.Net | .Net-Forum | DirectX | DirectX-Forum | Chat | Ausschreibungen | Links | Suchen | Stichwortverzeichnis | Feedback | Impressum

Seite empfehlen Bug-Report
Letzte Aktualisierung: Sonntag, 13. Dezember 2015