在我的microsoft访问数据库名称是DBMS.accdb,我有一个employee表,表的一列是salary。我已经创建了一个表单并且在表单加载时我想获得表的最大工资并进行一些计算,然后在表单的文本框(total_salary)中设置值。我想要这样的东西
Private Sub Form_Load()
Dim salary As Number
salary = "SELECT MAX([EMP (staff) Salary]) FROM Employee"
salary = salary + (1000 / 23)
total_salary.Value = salary
End Sub
我尝试了几种方式使用互联网的帮助,但它无法正常工作。我每次都会收到一些错误。
我该怎么做?
答案 0 :(得分:2)
如果您只想要最大值,可以使用grunt
函数而不是编写实际的SQL语句:
DLookup
或通过standrad sql
Private Sub Form_Load()
Dim salary As Double
salary = DLookup("MAX(Salary)", "Employee")
salary = salary + (1000 / 23)
total_salary.Value = salary
End Sub