[VB 6.0] Existenz von Eigenschaften feststellen

Hi Wer-Weiss-Wasser,

ich habe ein VB-Programm, in dem ich die Controls-Auflistung einer Form mit einer For each-Schleife durchlaufe.

Ich möchte jetzt alle Captions, sofern vorhanden, angezeigt bekommen…
Und genau das ist mein Problem: sofern vorhanden. Wie kann ich überprüfen, ob ein Objekt der Controls-Auflistung eine bestimmte Eigenschaft besitzt?

viele Dank,
Thomas

Direkt geht das geht gar nicht. Aber ich würde das über die Fehlerabfangroutinen machen.

in etwa so:

sub check ()
 on error goto fehler
 for each c in form.controls
 l\_caption=""
 l\_caption=c.caption
 msgbox l\_caption
 next
exit sub
fehler:
 resume next
end sub

cu, holli



> ich habe ein VB-Programm, in dem ich die Controls-Auflistung  
> einer Form mit einer For each-Schleife durchlaufe.  
>   
> Ich möchte jetzt alle Captions, sofern vorhanden, angezeigt  
> bekommen...  
> Und genau das ist mein Problem: sofern vorhanden. Wie kann ich  
> überprüfen, ob ein Objekt der Controls-Auflistung eine  
> bestimmte Eigenschaft besitzt?  
>   
> viele Dank,  
> Thomas

Hallo

Direkt abfragen kannst Du das nicht. Entweder Du machst es mit einem guten Errorhandling (On Error resume next :wink: )
oder Du frägts mit Typename(MyControl) den Typ des Controls ab und dann kannst Du je nach Control die Caption setzten.

Gruss, Giuseppe

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Danke! o.T.