在access2010中怎样为报表添 加分组并且以学号的第 5，6 位为依据

Question

如题所述

Answer 1

要在Access 2010的报表中添加分组，并依据学号的第5、6位进行分组，可以使用VBA编写一个函数来提取这部分信息。首先，打开Access 2010数据库，进入“设计视图”模式下的报表设计界面。

然后，选择一个适合的位置插入一个文本框控件，用于显示分组信息。在属性窗口中，将该文本框的“控件来源”属性设置为一个表达式。具体表达式可以参考以下VBA函数：

Sub ExtractMiddleDigits()
Dim strStudentID As String
Dim strMiddleDigits As String
strStudentID = [学号]
strMiddleDigits = Mid(strStudentID, 5, 2)
MsgBox "提取的第5、6位数字为: " & strMiddleDigits
End Sub

这里的“学号”字段应该替换为实际数据库中的字段名称。接下来，将此函数中的“strMiddleDigits”变量赋值给文本框的“控件来源”属性。这样，每次报表生成时，该文本框将自动显示学号的第5、6位。

此外，还需要在报表的“组页脚”或“组页眉”中插入一个控件，用于显示分组信息。通过设置控件的“控件来源”属性为上述VBA函数返回的值，即可实现根据学号的第5、6位进行分组。

最后，保存并预览报表，检查分组是否正确。如果需要调整分组规则或显示方式，可以返回设计视图进行相应的修改。