Access内置函数库能轻松解决很多问题。如果没有此函数，我们可以自定义函数来处理问题。

这里我们说说如何调用函数。调用内置函数和自定义函数方法是一样的。

一.创建自定义函数

在VBE视图下，插入-模块，新建一个模块后，键入以下函数。一个累加的函数。

Public Function leijia(n As Integer)        Dim i As Integer    Dim y As Long        y = 0    For i = 1 To n        y = y + i    Next    leijia = yEnd Function

二.调用函数

1.在查询中调用函数

可以在查询中直接调用，如Now(),year()等函数，也可以调用自定义函数

SELECT 表1.aaa,date() as 今天, leijia(5) AS 累加 FROM 表1;

2.在窗体报表中调用函数

在窗体和报表中调用函数是一样的，只需要引用函数即可

'按钮单击事件Private Sub Command2_Click()  MsgBox leijia(Text0)End Sub

或者直接（=函数）填入参数即可获取到值。