Cara Membuat Aplikasi Alarm Melalui Program Visual Basic

Hello Guys…

Kembali lagi di blog difatutor , Pada kesempatan kali ini saya akan membagikan informasi cara membuat aplikasi Alarm melalui VB 6

(Jangan lupa download file PDF tentang instalasi debian lengkap)

Nah untuk Langkah – Langkahnya , Silahkan sobat simak dibawah ini :

1. Yang pertama rancanglah Form sobat seperti dibawah ini

2. Jika sudah maka sobat tinggal memasukkan kode berikut :

Dim alarm As Boolean

Private Sub Command1_Click()

If alarm = True Then

Timer2.Enabled = False

Command1.Caption = "Aktif"

alarm = False

Else

Command1.Caption = "Tidak Aktif"

alarm = True

End If

End Sub

Private Sub Command2_Click()

End

End Sub

Private Sub Form_Load()

alarm = False

End Sub

Private Sub Timer1_Timer()

Label2.Caption = Time

If Text1.Text = Label1.Caption And alarm = True Then

Timer2.Enabled = True

End If

End Sub

Private Sub Timer2_Timer()

Beep

End Sub

*Contoh Hasilnya

Nah Sekarang sobat tinggal menjalankan aplikasi tersebut dengan menekan tombol F5

Demikianlah informasi dari saya semoga bermanfaat dan berguna buat sobatku sekalian , dan sampai jumpa di postingan selanjutnya…