Objekt als Variable an Funktion übergeben Verfasst am: 03.06.2003, 09:59
Hallo,
ich möchte in einer Funktion auf ein Objekt eines Forms zugreifen. Der Zugriff sollte aber möglichst dynamisch sein und sich auf verschiedene Forms beziehen können.
Also was ich meine:
Function datenzuweisung(frm As ?????)
With frm
.txt_id.DataField = "id_neu"
.txt_sozi.DataField = "sozietaet"
.txt_name.DataField = "name"
.txt_str.DataField = "str"
.txt_plz.DataField = "plz"
.txt_ort.DataField = "ort"
.txt_tel.DataField = "tel"
.txt_fax.DataField = "fax"
.txt_url.DataField = "www"
.txt_email.DataField = "email"
End With
End Function
frm soll hier für ein Objekt stehen (in diesem Fall das entsprechende Form).
Aus dem Form möchte ich die Funktion aufrufen
z.B.
dim frm as ?????
frm Form zuweisen ?????
allg.datenzuweisung(frm)
Würde mich sehr freuen, wenn mir jemand mit einer Lösung helfen könnte, da ich schon seit 2 Tagen an diesem Problem hänge und im Forum kein ähnliches Thema gefunden habe.
Registrieren
Login
