Membuat Jam Digital Dengan Visual Basic

Program untuk membuat jam digital dengan Visual Basic merupakan program yang relatif sederhana. Hanya diperlukan sebuah form dan beberapa baris pemrograman saja.
Desainlah form dan  tambakan timer, timer dapat diletakkan di mana saja karena tidak akan terlihat pada saat runtime. Kemudian beberapa kontrol yang ada harus diubah nilai propertinya sesuai dengan tabel berikut:

Kontrol	Properti	Nilai
Form	BorderStyle	1 – Fixed Single
	Caption	Jam Digital
TextBox	Name	TxtJam
	Text	[kosong]
Command Button	Name	CmdExit
	Caption	E&xit
Timer	Interval	1000

Tambahkan kode program ke dalam form tersebut seperti diberikan pada listing 1. Pada prinsipnya, pada saat form di load, teks pada txtJam harus menunjukkan waktu saat itu yang diberikan oleh objek Time. Kemudian setiap interval yang ditentukan pada kontrol Timer, teks pada txtJam juga diupdate sesuai dengan waktu saat itu.
Listing 3. Membuat Jam Digital Private Sub cmdExit_Click()
End
End Sub
Private Sub Form_Load()
txtJam.Text = Time
End Sub
Private Sub Timer1_Timer()
txtJam.Text = Time
End Sub