MareikeRemmel
Grünschnabel
Hallo,
ich habe eine klitzekleine Frage.
Und zwar möchte ich eine Messagebox aufrufen:
Dim f_return as interger
f_return =Messgebox("Möchten Sie die Applikation wirklich starten", vbYesNo)
If f_return = vbYes
' dann weiter
else if f_return =vbNo then
' Programm Ende
End if
Nun möchte ich gerne, dass defaultmässig der "No" Button aktiviert ist. Wenn also jemand einfach immer wild Enter drückt ohne zu lesen, soll das Programm nicht starten.
Wenn ich die Messagebox wie oben beschrieben aufrufe, ist aber immer der "Yes" Button aktiv. Wie kann ich das ändern, oder muss ich mir dafür ein eigens kleines Formular bauen?
ich habe eine klitzekleine Frage.
Und zwar möchte ich eine Messagebox aufrufen:
Dim f_return as interger
f_return =Messgebox("Möchten Sie die Applikation wirklich starten", vbYesNo)
If f_return = vbYes
' dann weiter
else if f_return =vbNo then
' Programm Ende
End if
Nun möchte ich gerne, dass defaultmässig der "No" Button aktiviert ist. Wenn also jemand einfach immer wild Enter drückt ohne zu lesen, soll das Programm nicht starten.
Wenn ich die Messagebox wie oben beschrieben aufrufe, ist aber immer der "Yes" Button aktiv. Wie kann ich das ändern, oder muss ich mir dafür ein eigens kleines Formular bauen?