vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
SEPA-Dateien erstellen inkl. IBAN-, BLZ-/Kontonummernprüfung  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2020
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
zugriff auf Instanz eines Form 
Autor: guenni255
Datum: 26.03.20 12:25

Hallo Forum

Ich habe ein Problem mit der Instanzierung eines Form.
folgender Code liegt zu Grunde:

Public Sub fEinsForm(Datum As Date)
Dim tempcol As colEinsätze
Dim tempForm As frmEinsatz
Set tempForm = New frmEinsatz
 
tempForm.Datum = Datum
Select Case PrgStatus
     Case "Eingabe"
          Select Case fDSvorhEinsatzPrüfen(Datum)
               Case False
                    Set tempcol = fEinsatzNeu(Datum)
 
               Case True
                    Select Case weitere
                         Case False
                              Set tempcol = fEinsatzVorhanden(Datum)
                         Case True
                              Set tempcol = fEinsatzWeitere(Datum)
                    End Select
 
 
          End Select
     Case "Ausgabe"
           Set tempcol = fEinsatzVorhanden(Datum)
 
 
End Select
Dim i As Integer
ReDim EinsForm(tempcol.count)
 
For i = 1 To tempcol.count
 
 
With tempForm
     .EinsNr = tempcol.item(i).EinsNr
     .Formmodus = tempcol.item(i).Formmodus
     .Top = 0
     .Width = 2250
     .Height = LEForm.Height
     .Caption = "Einsatz: " & .EinsNr
 If .EinsNr = 1 Then
     .Left = LEForm.Width + TagForm.Width
Else
     .Left = LEForm.Width + TagForm.Width + (.EinsNr - 1) * .Width
End If
 
     .Datum = tempcol.item(i).Datum
     .txtvon.Text = tempcol.item(i).EinsAnfang
     .txtbis.Text = tempcol.item(i).EinsEnde
     .txtEinsatzStd.Text = tempcol.item(i).EinsStd
End With
 
Set EinsForm(i) = tempForm
Next
Set tempcol = Nothing
End Sub
Wie Ihr seht soll das Ergebnis einer Collection in einem bzw.mehreren Form angezeigt werden.
im oberen Teil (bis Redim) ermittel ich die entsprechende Datencollection.
Ab Redim soll diese dann in der Form angezeigt werden. Das funzt auch soweit. Nur in der Collection "fEinsatzvorhanden" können auch mehrere Datensätze enthalten sein. Diese sollen dann in "je" einem Formular angezeigt werden. Das funzt nicht. Es werden zwar (in der Einzelschrittansicht) alle Datensätze angezeigt aber nur in einem Formular.
was mache ich falsch?????
und wie kann ich auf die instanz eines Formulars z.B Einsform(2) zugreifen????

für einen raschen Tipp wäre ich ausgesprochen dankbar.

LG Guenni
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
zugriff auf Instanz eines Form211guenni25526.03.20 12:25
Re: zugriff auf Instanz eines Form102Manfred X27.03.20 22:45
Re: zugriff auf Instanz eines Form99guenni25528.03.20 08:34

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übersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2020 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel