CODING EDIT & FINISH
source code
- Double Klik pada Command Ubah kemudian isikan coding untuk mengubah data, seperti berikut ini:
If Command2.Caption = "Ubah" Then
Command6.Caption = "Simpan"
Command1.Enabled = False
Command3.Enabled = False
DataGrid1.Enabled = False
Adodc1.Recordset.Update
Text2.SetFocus
Else
Command6.Caption = "SELESAI"
Command1.Enabled = True
Command3.Enabled = True
DataGrid1.Enabled = True
Adodc1.Recordset.Update
DataGrid1.Refresh
End If
Note :
perhatikan / sesuaikan "Command" jika coding tidak berjalan
SELAMAT MENCOBA
