Setelah tampilan form,database telah digabungkan langkah
selanjutnya adalah menjalankan tombol tambah dan simpan pada aplikasi vibi
caranya adalah
·
Klik 2 kali pada tombol tambah lalu masukkan
coding sebagai berikut
On Error GoTo a
Data1.Recordset.AddNew
Text1.SetFocus
a:
Command1.Enabled = False
Command2.Enabled = True
Command3.Enabled = False
Command4.Enabled = False
Command5.Enabled = False
Command6.Enabled = True
·
Selanjutnya klik 2 kali pada tombol simpan lalu
masukan coding sebagai berikut
On Error GoTo b
Data1.Refresh
Data1.Recordset.MoveLast
b:
Command1.Enabled = True
Command2.Enabled = False
Command3.Enabled = False
Command4.Enabled = True
Setelah coding
dimasukkan lalu tekan tombol running pada aplikasi lalu pada tombol tambah di
masukkan data,apabila data tersimpan pada Dbgrid maka aplikasi sudah dapat
dijalankan :
No comments:
Post a Comment