vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
sevDataGrid - Gönnen Sie Ihrem SQL-Kommando diesen krönenden Abschluß!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

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

Visual-Basic Einsteiger
Re: Naja machen wir mal na Aunahme Lordchen  
Autor: Tolwyn
Datum: 13.02.02 23:35

ne weitere Schilderung zum Code
' Das hier ist in Deinem IntervallForm
 
Option Explicit
' In dieser Variablen wollen wir uns später einen Verweis auf das 
' aufrufende Formular halten
Private oMyParent As Form1
 
Private Sub Form_Load()
  ' Beim laden des Forms wissen wir nicht wer es geladen hat
  Label1.Caption = "Keinen Schimmer wo ich her bin"
End Sub
' Weil wir aber wissen wollen wer uns geladen hat schreiben wir uns eine
' kleine Initialisierungsfunktion
Public Sub Init(oParentForm As Form1)
  ' Diese Funktion wird aufgerufen bevor das Form angezeigt wird
  ' "oParentForm" enthällt das Form welches uns lädt
  Set oMyParent = oParentForm
  Label1.Caption = "Ahhh ... Mein Guru ist: " & oMyParent.Caption
End Sub
 
Private Sub Form_Unload(Cancel As Integer)
  ' Beim entladen des Forms wollen wir nun das aufrufende Form mit 
  ' einigen Informationen versorgen. Dafür haben wir die Variable "oMyParent"
  ' die einen Verweis auf das aufrufende Form enthällt
  ' so nun den Parent versorgen
  oMyParent.List1.AddItem "Irgendwas"
End Sub
 
Und nun noch den Code für das aufrufende Form: 
 
Private Sub cmdInterval_Click()
   ' Wir laden das Form2 (Intervall Form) nicht einfach nur mit 
  Form2.Show
 
  ' sondern sorgen vorher noch für die entsprechenden Informationen
  ' dazu verwenden wir die HilfsVariable oForm vom Typ des IntervallForms
  Dim oForm As Form2
 
  Set oForm = New Form2
  ' nun rufen wir die "Init" Funktion dieses Forms auf und übergeben uns selbst
  ' damit das IntervallForm auch weiß wer es geladen hat.
  oForm.Init Me
  ' nun ist das Form geladen und weiß wer es geladen hat. Allerdings ist es 
  ' noch nicht 
  ' sichtbar. Nun nur noch den Shov Befehl, damit der User das Form auch sieht.
  oForm.Show vbModal
  ' voila fertig
End Sub
Gruß
Tolwyn
PS: Warum habe ich das Gefühl das diese Beschreibung komplizierter ist als mein erstes Posting ?!?
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Lösungsvorschlag103Levis13.02.02 17:49
Re: Lösungsvorschlag81Tolwyn13.02.02 19:32
Erklärung....79Levis13.02.02 21:39
Re: Erklärung....408unbekannt13.02.02 22:11
Re: Naja machen wir mal na Aunahme Lordchen 85Tolwyn13.02.02 23:35
Tja ... siehste ... höre auf einen Modi-Profi 369unbekannt14.02.02 00:08

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-2025 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