Add to my Command Button

  • Thread starter Thread starter Bob
  • Start date Start date
B

Bob

--
I have already this on my command button is it possible to extend it by
adding this to it:

Private Sub Command220_Click()
Me!tbStartDate1 = DateSerial(Year(Date), Month(Date), 1)
Me!tbEndDate1 = DateSerial(Year(Date), Month(Date) + 1, 0)
tbEndDate1.SetFocus
tbEndDate1_LostFocus
End Sub

I would like to add to this script:

cbDailyCharge1 = tbSetUp,DailyCharge
tbDailyChargeRate1 = tbSetup,DailyRate
tbAdditionalCharge = tbSetUp,AddCharge
tbAdditionalChargeRate = tbSetUp,AddRate

Thanks for any help with this script...................Bob
 
Assuming that by "tbSetUp,DailyCharge", you mean you want the value of the
field DailyCharge in table tbSetUp, you can use the DLookup function.
 
Back
Top