Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Zwei Forms öffnen
Autor: Mike
Datum: 02.03.02 17:37
Hallo Danke Moni, habe es versucht aber es wil nicht, ich weis nicht wo ich den Befehl setzten soll, hier der Code zum aufrufen des Forms per Tree View MFG Mike Private Sub Form_Load() 'tvTreeView.LineStyle = 1 ' TreeView füllen Dim NodeX As Node With tvTreeView.Nodes .Add , , "A", "Test" .Add "A", tvwChild, "Fom1", "Form1" .Add , , "B", "Test1" .Add "B", tvwChild, "Fom3", "Form3" End With End Sub ----------------------------------------------------- Private Sub tvTreeView_NodeClick(ByVal Node As MSComctlLib.Node) If Not oForm Is Nothing Then Unload oForm Set oForm = Nothing End If Select Case Node.Key Case "Form1" Set oForm = Form1 Case "Form3" Set oForm = Form3 End Select ' Form positionieren und anzeigen With oForm SetParent .hwnd, Picture1.hwnd '.Move Me.ScaleWidth - .Width, 0 .Show End With Me.SetFocus End Sub

Zwei Forms öffnen	80	Mike	02.03.02 16:31
Re: Zwei Forms öffnen	1.216	Moni	02.03.02 16:48
Re: Zwei Forms öffnen	60	Mike	02.03.02 17:37
Re: Zwei Forms öffnen	1.196	Moni	02.03.02 18:50
Re: Zwei Forms öffnen	43	Mike	02.03.02 19:34
Re: Zwei Forms öffnen	1.217	unbekannt	02.03.02 19:50
Re: Zwei Forms öffnen	40	Mike	02.03.02 20:49
Re: Zwei Forms öffnen	1.203	unbekannt	02.03.02 21:05
Re: Zwei Forms öffnen	48	Mike	02.03.02 22:04

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

Suchen