Hi Com ich habe ein Problem immer wenn ich debugge closen sich alle 2 Formen hier mal code.
VB.NET-Quellcode
- Public Class NewtownReallife
- Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click
- End Sub
- Private Sub ProgressBar1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar1.Click
- End Sub
- Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick ProgressBar1.Value += 1 If ProgressBar1.Value = 100 Then Timer1.Stop() If Timer1.Enabled = True Then
- Else Me.Close() Form1.Show() End If End Sub
- Private Sub NewtownReallife_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Timer1.Start()
- End Sub
- Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
- End SubEnd Class