K
Kaleidsocopskalei
Also der Threadsteller fragte nach der Progressbar, folgendes:
Ich denke es wird dir helfen! Fragen?
Code:
Private Sub Button1_Click()
Timer1.Start()
End Sub
Private Sub Timer1_Tick()
ProgressBar1.Increment(1)
End Sub
Private Sub Form1_Load()
If ProgressBar1.Value = 100 Then
'Hier beliebigen code einfügen
' oder gibts wünsche?
End If
End Sub
Ich denke es wird dir helfen! Fragen?