Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fehler: Bei Übergabe eines Controls an eine Unterfunktion
Autor: MasterGandi
Datum: 15.12.02 03:16
Hallo Leute, habe folgendes Problem: ==================================== Habe eine Funktion geschrieben, an die ich ein einzelnes Control in diesem Fall eine Textbox übergeben wird. Das ganze funktioniert wunderbar wenn ich zu "Textfeld" übergebe. Will ich aber ein Element eines Arrays von "Textfeldern" übergeben funktionierts nicht. Klingt kompliziert isses aber nicht nachfolgend der Quelltext. __________________________________________________________________ Private Function Teste_PfadNamen_Leer(Betr_Objekt As Control, Fehlertext As String, FehlerButtons As Byte) Teste_PfadNamen_Leer = True If Betr_Objekt.Text = "" Then Call Fehlerform.Fehlerform_anzeigen(Fehlertext, FehlerButtons, Betr_Objekt) Teste_PfadNamen_Leer = False End If End Function Das Funkioniert: ================ If Teste_PfadNamen_Leer(Quellverzeichnis, "Das Quellverzeichniss wurde noch nicht ausgewählt.", 0) = False Then Exit Sub Das Funktioniert nicht: ======================= For I=0 to 4 If Teste_PfadNamen_Leer(Quellverzeichnis(I), "Das Quellverzeichniss wurde noch nicht ausgewählt.", 0) = False Then Exit Sub Next i ___________________________________________________________________ Wie bekomme ich jetzt die Funktion beides zu Akzeptieren. Möchte wenn möglich das ganze Universal einsetzen. Danke im Vorraus für die Hilfe.

Fehler: Bei Übergabe eines Controls an eine Unterfunktion	663	MasterGandi	15.12.02 03:16
Re: Fehler: Bei Übergabe eines Controls an eine Unterfunktio...	63	Zardoz	15.12.02 05:39
Re: Fehler: Bei Übergabe eines Controls an eine Unterfunktio...	348	MasterGandi	15.12.02 06:13

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen