Kali ini Saya akan membagi cara membuat aplikasi stopwatch pada visual basic 2008 .
Langsung saja :
If milseconds = 60 Then
milseconds = 0
Langsung saja :
- Kita Harus membuat Form.
- Buat 1timer, 2 Label , 1 PictureBox dan 3 Button.
- Desai peserti gambar Di bawah ini
If milseconds = 60 Then
milseconds = 0
seconds = seconds + 1
End If
If seconds = 60 Then
If milseconds = 60 Then
milseconds = 0
seconds = 0
minutes = minutes + 1
End If
End If
If minutes = 60 Then
If seconds = 60 Then
If milseconds = 60 Then
milseconds = 0
seconds = 0
minutes = 0
hours = hours + 1
End If
End If
End If
milseconds = milseconds + 1
Label2.Text = Format(hours, "00") & ":" & Format(minutes, "00") & ":" & Format(seconds, "00") & ":" & Format(milseconds, "00")
End If
If seconds = 60 Then
If milseconds = 60 Then
milseconds = 0
seconds = 0
minutes = minutes + 1
End If
End If
If minutes = 60 Then
If seconds = 60 Then
If milseconds = 60 Then
milseconds = 0
seconds = 0
minutes = 0
hours = hours + 1
End If
End If
End If
milseconds = milseconds + 1
Label2.Text = Format(hours, "00") & ":" & Format(minutes, "00") & ":" & Format(seconds, "00") & ":" & Format(milseconds, "00")
5. Kalau Sudah Klik 2x Pada Button Start dan tuliskan rumus di bawah ini :
Timer1.Interval = 10
Timer1.Start()
Timer1.Start()
6. Lanjut Klik 2x Pada Button Pause dan tuliskan script di bawah ini :
Timer1.Stop()
7. Dan yang terakhir klik 2x Pada Button Reset :
Timer1.Stop()
Label1.Text = ("00:00:00:00")
Nah itu cara membuat Stopwatch sederhana dari Visual Basic 2008 . Jika kurang jelas bisa di tanyakan . File Bisa di Download Disini ...
Semoga Bermanfaat dan jangan lupa kalau mau Reupload sertakan sumbernya :)
Timer1.Stop()
Label1.Text = ("00:00:00:00")
Nah itu cara membuat Stopwatch sederhana dari Visual Basic 2008 . Jika kurang jelas bisa di tanyakan . File Bisa di Download Disini ...
Semoga Bermanfaat dan jangan lupa kalau mau Reupload sertakan sumbernya :)
0 komentar :
Posting Komentar