Friday, July 20, 2012

Contoh Program Database Pada Visual Basic

Simpan

Private Sub Command1_Click()
If Text1.Text = Empty Then
Text1.SetFocus
Exit Sub
End If
cari = "npm = '" & Text1.Text & "'"
Data1.Recordset.FindFirst cari
If Data1.Recordset.NoMatch Then
Data1.Recordset.AddNew
Data1.Recordset.nama = Text1.Text
Data1.Recordset.npm = Text2.Text
Data1.Recordset.kelas = Text3.Text
Data1.Recordset.jurusan = Text4.Text
Data1.Recordset.fakultas = Text5.Text
Data1.Recordset.dosen = Text6.Text
Call Command2_Click
Else
MsgBox "NPM SUDAH TERDAFTAR", 0 + 16, "PERINGATAN"
Text1.SetFocus
End If
End Sub
Hapus
Private Sub Command2_Click()
Text1.Text = Clear
Text2.Text = Clear
Text3.Text = Clear
Text4.Text = Clear
Text5.Text = Clear
Text6.Text = Clear
Text1.SetFocus
End Sub
Keluar
Private Sub Command3_Click()
End
End Sub
Simpan
Untuk menyimpan data pada TextBox yang ada di dalam database
Hapus
Untuk menghapus data pada TextBox yang ada di dalam database
Keluar
Untuk keluar dari program 

 
1KA33            : nama file database yang dibuat
Properties        : pilihan untuk membuat table baru pada database
Add                 : untuk menambahkan data pada database
Edit                  : untuk mengubah data pada database
Delete              : untuk menghapus data pada database
Close               : untuk keluar dari database
 
Source :  http://trimaaja.blogspot.com/



HOT INFO

Anda ingin mencari refrensi dan contoh program lengkap ? Kami ada. Sekarang Anda bisa mencari contoh program visual basic 6.0 di situs ini : www.panduanSkripsi.net. Koleksi program lengkap di sana, proyek PHP dan MySQL, juga jQuery dan Framework. Bukunya juga ada.

No comments:

Post a Comment