| | |
MS Access 2003 Application Programming
•
•
•
•
- Position:
- Company:
- Location:
- Salary:
- Type:
- On Premises:
- Email:
- Phone:
A client has contacted me asking to correct some errors in a MS Access 2003 application
I am willing to pay $5/hour (35 Hours - 10 days Max)
anyone interested pls contact me at creationzunlimited@gmail.com
I am willing to pay $5/hour (35 Hours - 10 days Max)
anyone interested pls contact me at creationzunlimited@gmail.com
0
Please help. In Access 2003 I am trying to calculate a sum of all records of a specific field. I have found the field and unbound the field. I am able to place a specific value in the field but not able to get a sum of the values on my form footer as a total. I keep getting an
The expression may not result in the name of a macro, the name of a user-defined function, or [Event Procedure]
There may have been an error evaluating the function, event, or macro.
Code With Bound Field to Table Field:
'Private Sub Text75_Change()
'Me.Text75.OnChange
'Me.InputParameters (Sum(ChangeOrders.PendingFundedAmount))
'End Sub
'Private Sub Text75_Click()
'Me.Text75 = "2000"
'End Sub
'Private Sub Text75_Exit(Cancel As Integer)
'Me.Text75 = "10000"
'End Sub
Private Sub Text75_Change(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.DataEntry = False
Me.Text75 = Sum([ChangeOrders].[PendingFundedAmount])
End Sub
When I try the other route unbound I am getting a sub or function not defined:
Private Sub Text75_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.DataEntry = False
Me.Text75 = Sum(Pending2FundedAmount)
End Sub
The expression may not result in the name of a macro, the name of a user-defined function, or [Event Procedure]
There may have been an error evaluating the function, event, or macro.
Code With Bound Field to Table Field:
'Private Sub Text75_Change()
'Me.Text75.OnChange
'Me.InputParameters (Sum(ChangeOrders.PendingFundedAmount))
'End Sub
'Private Sub Text75_Click()
'Me.Text75 = "2000"
'End Sub
'Private Sub Text75_Exit(Cancel As Integer)
'Me.Text75 = "10000"
'End Sub
Private Sub Text75_Change(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.DataEntry = False
Me.Text75 = Sum([ChangeOrders].[PendingFundedAmount])
End Sub
When I try the other route unbound I am getting a sub or function not defined:
Private Sub Text75_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.DataEntry = False
Me.Text75 = Sum(Pending2FundedAmount)
End Sub
Similar Threads
- Error in loading DLL (Error 48) in Access 2003 (MS Access and FileMaker Pro)
- how to display images in a form in access 2003 (MS Access and FileMaker Pro)
- can we connect VB 6 wtih databases in Ms Office Access 2003? (Visual Basic 4 / 5 / 6)
- BDE Alias for ACCESS 2003 User/pwd ?? (C++)
- In which (really) important ways is SQL 2000 better than Access 2003? (MS SQL)
- mid problem in access 2003 (Windows NT / 2000 / XP)
| Thread Tools | Search this Thread |
Tag cloud for Tech / IT Consultant Job Offers
amgen aol bailout barackobama billgates biotech biotechnology blackberry blog broadcom career careers certifications cisco consultant consumers counseling cyberbullying dell ebay economy education fdic google green highspeed holidayspending homebaseddataentryjobs ibm incentives informationweek intel investment itpurchases jobmarket jobs jobtraining jpmorgan legal micropayments microsoft myspace oakmontfund obama onlinedataentryjobs oslo panic potus predictions president qualcomm rally research rim rimm risk routers schools semiconductors semiconductorstocks stalking startup steveballmer stockmarket stocks studies suicide survey tech tech-ed techcrunch technology technologystocks techsector techstocks techtoys termsofservice texasinstruments training ubs wallstreet workfromhomedataentry yahoo



