Written code:
Private Sub Command2_Click()
ado1DailyIncome.Recordset.Fields("Quntity") = Text2.Text
ado1DailyIncome.Recordset.Fields("Amount") = Text3.Text
ado1DailyIncome.Recordset.Fields("TQuntity") = Text17.Text
ado1DailyIncome.Recordset.Fields("TAmount") = Text18.Text
ado1DailyIncome.Recordset.Update
End Sub
Last edited by viv345; March 3rd, 2010 at 07:42 AM.
* The Best Reasons to Target Windows 8
Learn some of the best reasons why you should seriously consider bringing your Android mobile development expertise to bear on the Windows 8 platform.