Sedikit percobaan untuk membuat jam digital kita mencoba membuat
jam dgital dari vb . mungkin sebagian besar pad asudah pada ngerti, tapi
apa salahnya kita mencoba dan berbagi. Adapun langkah-langkah atau cara
Membuat jam digital menggunakan visual basic adalah sebagai berikut:
Buka program Visual Basic agan
Pada sebuah Form Tambahkan sebuah kontrol label dan juga sebuah kontrol timer
Label ada 3 kita beri nama :
H sebagai jam
M sebagai minute
S sebagai second
untuk lebih jelasnya bisa melihat source code dibawah ini
Desain Form
Komponen yang dibutuhkan
Kunjungi juga contoh aplikasi laporan CRUD disini
——————————————————————————————————–
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Start()
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim Jam As Date
Jam = DateTime.Now
TextBox1.Text = Jam.Hour.ToString()
TextBox2.Text = Jam.Minute.ToString()
TextBox3.Text = Jam.Second.ToString()
End Sub
End Class
Buka program Visual Basic agan
Pada sebuah Form Tambahkan sebuah kontrol label dan juga sebuah kontrol timer
Label ada 3 kita beri nama :
H sebagai jam
M sebagai minute
S sebagai second
untuk lebih jelasnya bisa melihat source code dibawah ini
Desain Form
Komponen yang dibutuhkan
- Timer
- Label
Kunjungi juga contoh aplikasi laporan CRUD disini
——————————————————————————————————–
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Start()
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim Jam As Date
Jam = DateTime.Now
TextBox1.Text = Jam.Hour.ToString()
TextBox2.Text = Jam.Minute.ToString()
TextBox3.Text = Jam.Second.ToString()
End Sub
End Class
0 comments:
Post a Comment