Cari Blog Ini

Minggu, 18 September 2011

Membuat Aplikasi Absensi Menggunakan Visual Basic


ASSALAMMUALAIKUM GAN,,,,
nie ad sedikit program sederhana yg saya modif,,,jika ingn coba silakan ajh,,nie skrip.a...

Private Sub Command1_Click()
Adodc1.Recordset.AddNew
Adodc1.Recordset!no = Text1.Text
Adodc1.Recordset!nip = Text2.Text
Adodc1.Recordset!nama = Text3.Text
Adodc1.Recordset!tanggal = Text4.Text
Adodc1.Recordset!jenis_kelamin = Text5.Text
Adodc1.Recordset!bagian = Text6.Text
Adodc1.Recordset.Update
Text1 = ""
Text2 = ""
Text3 = ""
Text4 = ""
Text5 = ""
Text6 = ""
Text1.SetFocus


End Sub

Private Sub Command2_Click()
End
End Sub

mudah kn,,,selamat mencoba gan,,,
^_^