Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Ein-/Ausblendeffekt
Autor: Chief
Datum: 21.10.03 09:50
Hallo Snof, ich habe den Code gestern noch ausprobiert, hat super geklappt. Ich poste den Code mal hier damit anderen die das gleiche Problem haben auch geholfen wird. Dank Deiner Hilfe bin ich ein riesengroßes Stück weiter, danke nochmal. Hier der Code für die, bei denen das gleiche Problem auftritt: In Form1: Private Sub Form1_Load(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MyBase.Load ' Die Anzeige-Dauer in Millisekunden Timer1.Interval = 4000 Timer1.Start() ' Einblenden FensAnim(Me, FensAnimArt.EINBLENDEN, FensAnimEffekt.DIMMEN, FensAnimRichtung.W, 1400) End Sub Private Sub Form1_Closed(ByVal sender As Object, _ ByVal e As System.EventArgs) Handles MyBase.Closed ' Ausblenden FensAnim(Me, FensAnimArt.AUSBLENDEN, FensAnimEffekt.DIMMEN, FensAnimRichtung.W, 1400) End Sub Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Me.Close() End Sub In Form2: Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load App.F2 = Me App.F3 = New Form3() Dim F1 As New Form1() F1.ShowDialog() End Sub Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click App.F3.Show() Me.Hide() End Sub In Form3: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click App.F2.Show() Me.Hide() End Sub Private Sub Form3_Closed(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Closed App.F2.Close() End Sub Dem Programm muß zusätzlich unter Projekt --> Klasse hinzufügen eine neue Klasse hinzugefügt werden. In der Classe dann diesen Code reinschreiben: Class App Friend Shared F2 As Form2 Friend Shared F3 As Form3 End Class So das wars, es müßte jetzt einwandfrei funktionieren. [u]Big THX an Snof Gruß Chief Chief

Ein-/Ausblendeffekt	1.419	Chief	11.10.03 17:28
Re: Ein-/Ausblendeffekt	787	Chief	13.10.03 15:47
Re: Ein-/Ausblendeffekt	790	Snof	16.10.03 18:15
Re: Ein-/Ausblendeffekt	747	Chief	16.10.03 18:28
Re: Ein-/Ausblendeffekt	702	Snof	16.10.03 20:41
Re: Ein-/Ausblendeffekt	798	Chief	16.10.03 21:33
Re: Ein-/Ausblendeffekt	765	Snof	16.10.03 23:25
Re: Ein-/Ausblendeffekt	698	Chief	17.10.03 00:57
Re: Ein-/Ausblendeffekt	672	Chief	17.10.03 01:01
Re: Ein-/Ausblendeffekt	897	Snof	17.10.03 01:45
Re: Ein-/Ausblendeffekt	681	Chief	17.10.03 05:07
Re: Ein-/Ausblendeffekt	806	Snof	17.10.03 13:33
Re: Ein-/Ausblendeffekt	784	Chief	17.10.03 14:50
Re: Ein-/Ausblendeffekt	646	Chief	18.10.03 17:03
Re: Ein-/Ausblendeffekt	717	Snof	19.10.03 01:57
Re: Ein-/Ausblendeffekt	767	Chief	19.10.03 10:58
Re: Ein-/Ausblendeffekt	778	Snof	19.10.03 12:26
Re: Ein-/Ausblendeffekt	688	Chief	19.10.03 17:34
Re: Ein-/Ausblendeffekt	693	Snof	19.10.03 17:48
Re: Ein-/Ausblendeffekt	719	Chief	19.10.03 18:03
Re: Ein-/Ausblendeffekt	750	Snof	20.10.03 09:09
Re: Ein-/Ausblendeffekt	733	Chief	20.10.03 11:45
Re: Ein-/Ausblendeffekt	729	Snof	20.10.03 19:17
Re: Ein-/Ausblendeffekt	722	Chief	20.10.03 19:57
Re: Ein-/Ausblendeffekt	688	Snof	20.10.03 22:34
Re: Ein-/Ausblendeffekt	854	Chief	21.10.03 09:50

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