Form merhrmals öffnen und ansprechen Verfasst am: 12.06.2009, 01:05
Nabend euch allen,
bin fast am verzweifeln mit meinem Problem. Ich möchte gern auf Knopfklick eine Form mehrmals laden was auch kein Problem ist mit
Code:
Dim fNew As New form2
fNew.Show
fNew.Caption = "test"
Nur weiß ich nicht wie ich außerhalb der Sub die Form ansprechen soll denn fNew. sagt mir die Variable wäre nicht definiert. Entweder ist es einfach zu spät oder ich bin zu dumm. Bin für jeden Tip dankbar.
MfG
Keymaster
ShockerZz Tutorial Leser
Anmeldedatum: 04.04.2009 Beiträge: 34
Verfasst am: 12.06.2009, 20:30
Du musst die Form außerhalb der Sub deklarieren (noch nicht das .Show natürlich, das machst du dann in der Sub).
keymaster Newbie
Anmeldedatum: 11.06.2009 Beiträge: 2
Verfasst am: 12.06.2009, 21:19
Wenn ich aber die Variable fNew außerhalb der Sub deklariere dann öffnet sich zwar die form aber eben nur einmal. Also so als würde ich einfach form.show machen.
EDIT:
Habe jetzt mal weiter getestet und habe eine nicht ganz schöne Lösung gefunden:
Code:
Dim a As Integer
Dim fnew(1000) As New Form2
Private Sub Command1_Click()
a = a + 1
fnew(a).Show
fnew(a).Label1.Caption = a
End Sub
Private Sub Command2_Click()
fnew(1).Label1.Caption = "test1"
End Sub
Private Sub Command3_Click()
fnew(2).Label1.Caption = "test2"
End Sub
Private Sub Form_Load()
End Sub
Wie ihr seht habe ich das ganze jetzt als Array gemacht. Jedoch muss ich außerhalb der Sub erstmal ein ewig großes Array erstellen da ich nicht weiß wieviele Forms wirklich geöffnet werden. Habe schon mit redim in command1 versucht jedoch lässt sich dann nur das zuletzt geöffnete Fenster ansprechen. Das muss doch irgendwie schöner gehen.
Registrieren
Login
