' =========================================================
'Die cmd_buttons cmd_Eintragen2k,cmd_Eintragen2k3, cmd_EintragenXP und 
' cmd_EintragenVX
'durch ein Steuerelementefeld cmd_Eintragen(Index) ersetzen  (i = 1 bis 4)
'Die beschriftungen z.B. "RPG-Maker 2000:" in die jeweilige .Tag-Eingenschaft
'des entsprechenden Buttons eintragen.
'Dann kannst du die 4 Click Ereignisse cmd_EintragenXXX_click()
'durch folgenden Code ersetzen:
 
Private Sub cmd_Eintragen(Index As Integer)
    Eintragen (Index)
End Sub
 
Private Sub Eintragen(MWCap As Integer)
    Pfadeingabe.Show
    Pfadeingabe.lbl_Makerwahl.Caption = MWCap
    Pfadeingabe.lbl_Maker.Caption = cmd_Eintragen(Index).Tag
End Sub
' ========================================================

Uli

Wissen ist Macht; nichts wissen macht auch nichts!