Alle Controls des Formulars zusammensuchen und auf der DB speichern

[Visual Basic]
Public Function List_Form_Controls( _ 
   ByRef f As Form _ 
) As Object

Parameter

f

Betroffenes Formular

Quellcode

[Visual Basic]
        Public Function List_Form_Controls(ByRef f As Form) 
            Me.ctlcol.Clear() 
            formname = f.Name 
            For Each ctl As Control In f.Controls 
                Objectanalysis(ctl) 
            Next 
            Dim i As Integer 
            For i = 1 To ctlcol.Count 
                Dim secobj As MyFormControls = ctlcol(i) 
                secobj.Write_Object_to_DB() 
            Next 
        End Function

Forderungen

Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition

Siehe auch

MySecurity