Hey leute ich habe ein Problem, der Code den ich verwende funktioniert leider nicht.
Ich will folgendes tun, beim Klick auf einem Button soll eine ProgressBar starten und sich füllen.
Nachdem der Button gefüllt ist, soll ein PNG-Bild geöffnet werden bzw. auf den Desktop kopiert
und eine MsgBox mit einer Nachricht erscheinen.
So ungefähr soll das aussehen, den anfang mit der progressbar habe ich auch wenn der nicht gerade gut ist:
Ich will folgendes tun, beim Klick auf einem Button soll eine ProgressBar starten und sich füllen.
Nachdem der Button gefüllt ist, soll ein PNG-Bild geöffnet werden bzw. auf den Desktop kopiert
und eine MsgBox mit einer Nachricht erscheinen.
So ungefähr soll das aussehen, den anfang mit der progressbar habe ich auch wenn der nicht gerade gut ist:
Quellcode
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- ProgressBar1.Maximum = 1000
- Timer1.Interval = 1000
- Timer1.Start()
- ProgressBar1.Value += 100
- ProgressBar1.Value += 100
- ProgressBar1.Value += 100
- ProgressBar1.Value += 100
- ProgressBar1.Value += 100
- ProgressBar1.Value += 100
- ProgressBar1.Value += 100
- ProgressBar1.Value += 100
- ProgressBar1.Value += 100
- If ProgressBar1.Value = 990 Then
- ProgressBar1.Value = 1000
- Timer1.Stop()
- Me.Close()
- Me.Show()
- Else
- ProgressBar1.Value += 100
- End If
- (Wenn die Progressbar1 gefüllt ist, dann soll das PNG-Bild geöffnet bzw. auf den Desktop kopiert werden und eine MsgBox erscheinen)
- End Sub