Visual Basic Forum

tolio · Newbie Anmeldedatum: 08.06.2008 Beiträge: 13

Also ich habe 2 Fragen:
1. Wie kann ich einen Timer so einstellen das jede Sekunde Progressbar.value = +1 geht? Also das jede Sekunde die Progressbar weiter geht.

Und 2. Wie kann ich im Hintergrund Musik abspielen lassen ?
Beim Musik Format würde ich das nehmen was am einfachsten ist =P.

Danke im vorraus.

BadboyGER · Tutorial Leser Anmeldedatum: 01.05.2008 Beiträge: 39

Hier zur Frage wegen Timer :

Visual Basic: [code]Private Sub cmd_go_Click()
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
With pb
pb.Value = pb.Value + 1
End With
If pb.Value = 100 Then
Timer1.Enabled = False
End If
End Sub[/code]

Den Timer1 auf Intevall 10 stellen oder so wie du willst
(1000 = 1 Sekunde)

Zu Frage 2 :

Nimm am besten als Format für Musik den BASSMOD. Musste einfach mal googlen der Code ist ziehmlich lang.

MfG.
BadboyGER

tolio · Newbie Anmeldedatum: 08.06.2008 Beiträge: 13

m iwie funktioniert das nicht recht. Was genau ist "pb"?
(bin ein vb newbie) =P

Jings · Poster Anmeldedatum: 02.05.2008 Beiträge: 123

pb ist einfach nur die Abkürzung von ProgressBar

Also wenn du die Punkte, wo "pb" steht einfach so umänderst, dass sie genau den Namen deiner ProgressBar haben, sollte es eigentlich funktionieren Wink

MfG
Jings

tolio · Newbie Anmeldedatum: 08.06.2008 Beiträge: 13

Ah jetzt gehts ich hatte "progressbar" statt "prograssbar1" hab iwie die "1" vergessen ....
gut das geht also. DANKE
Aber mit der Musik bin ich immernoch nicht weiter gekommen. Ich habe zwar gegoogelt aber nichts gefunden. Vllt findet da noch einer der sich da auskennt.

Administrator · Poster Anmeldedatum: 16.04.2008 Beiträge: 153

(BadboyGER;3669)

Hier zur Frage wegen Timer :

Visual Basic: [code]Private Sub cmd_go_Click()
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
With pb
pb.Value = pb.Value + 1
End With
If pb.Value = 100 Then
Timer1.Enabled = False
End If
End Sub[/code]