Guten morgen…
habe mal wieder ein Problem *g*
Ich muss für ein Interentcafé ein Abrechungsprogramm schreiben und hänge mal wieder fest…
Also ich bin jetzt soweit das sich für die ganzen einzelnen Sitzplätze ein Formular mehrmal öffnen lässt aber jetzt zeigt er mir meine UserNr nicht mehr in Usertxt und bei frm Abrbogen auch nicht mehr an…davor ging es…
Was stimmt jetzt wieder nicht daran…
Dim frmAbrbogen1(1 To 30) As New frmAbrbogen
Private Sub User15_Click()
Usertxt = „15“
frmAbrbogen1(15).Show
frmAbrbogen.Caption = "Abrechnungsbogen für Sitzplatz: " & Usertxt
frmAbrbogen.Userabrb1.Text = Usertxt
End Sub
Private Sub User16_Click()
Usertxt = „16“
frmAbrbogen1(16).Show
frmAbrbogen.Caption = "Abrechnungsbogen für Sitzplatz: " & Usertxt
frmAbrbogen.Userabrb1.Text = Usertxt
End Sub
…usw.
bitte helft mir! 
Gruß Maria