| vbModal, vbModeless |
| |
| |
| Prozeduren im Formular "Anzeigen einer...": | |
| |
| Private Sub cmdModal_Click() | Reihenfolge: Formular Anzeige, Formular Info, |
| frmInfobox.Show Modal:=vbModal | MsgBox Fertig. |
| MsgBox "InfoBox wurde Modal angezeigt.", 48, "Fertig" | |
| End Sub | |
| |
| Private Sub cmdModeless_Click() | Reihenfolge: Form. Anzeige, MsgBox Fertig, Form. Info. |
| frmInfobox.Show vbModeless | Andere Möglichkeit ohne " Modal:= ". |
| MsgBox "InfoBox wurde Modeless angezeigt.", 48, "Fertig" | |
| End Sub | |
| |
| Prozeduren im Formular "Info über...": | |
| |
| Private Sub Form_Load() | |
| cmdOK.Cancel = True | Das Drücken der Esc-Taste hat die gleiche Wirkung |
| End Sub | wie das Anklicken des CommandButtons. |
| |
| Private Sub cmdOK_Click() | |
| Unload Me | Beide Formulare entladen. |
| Unload frmAnzeige | |
| End Sub | |
| | |
| |
| |
| |
| |
| |
| . |
| |
zurück