第9 vba程序设计基础.pptVIP

9.7 API函数与ActiveX数据对象 9.7.3 数据访问和处理的特殊函数 1．DCount函数、DAvg函数、DSum函数 DCount函数用于返回指定记录集中的记录数；DAvg函数用于返回指定记录集中某个字段列数据的平均值；DSum函数用于返回指定记录集中某个字段列数据的总和。三个函数都可以在VBA、宏、查询表达式或计算控件中直接使用。 调用格式：DCount（表达式，记录集[，条件式]） DAvg（表达式，记录集[，条件式]） DSum（表达式，记录集[，条件式]） 其中，“表达式”用于标识统计的字段；“记录集”用来标识数据来源，可以是表或查询的名称；“条件式”作为可选的字符串表达式，用于限制函数执行的数据范围。 9.7 API函数与ActiveX数据对象 例：统计“学生档案表”中的学生总人数，结果显示在文本框中。 设置文本框控件的“控件来源”属性为如下表达式： =DCount（”学号”,”学生档案表”） 例：统计“学生成绩表”中选修了“1”号课程的学生平均成绩，结果显示在文本框中。 设置文本框控件的“控件来源”属性为如下表达式： =DAvg（”成绩”,”学生成绩表”,”课程代码=’1’”） 9.7 API函数与ActiveX数据对象 2．DLookup函数 DLookup函数是从指定记录集中检索特定字段的值。它同以上三个函数一样，可以在VBA、宏、查询表达式或计算控件中直接使用，而且主要用于检索来自非数据源表中字段的数据。如果有多条记录的该字段值满足“条件式”的，DLookup函数将返回第一个匹配条件的记录所对应的字段值。 调用格式： DLookup（表达式，记录集[，条件式]） 例：根据“fScore”窗体中名为“tSno”文本框控件中的值来检索非数据源表“学生档案表”中“姓名”字段的值，结果显示在另一个文本框中。 设置该文本框控件的“数据来源”属性为如下表达式： =DLookup（”Sname”,”tStudent”,”学号=’” Forms!fScore!tSno ”’”） 9.8 常用操作方法 9.8.1 消息框 消息框用于在对话框中显示消息，通常用在错误提示、结果显示或等待用户选择执行操作的情况下，当用户单击命令按钮后，系统会返回一个整型值来反馈用户的选择情况（单击了哪一个命令按钮），它的功能在VBA中是以函数的形式调用的。 调用格式：MsgBox(prompt[,buttons][,title][,helpfile,context]) 参数说明： Prompt：用于指定显示在对话框的的消息，是必需指定的参数，最大长度为1024个字符。多行间可用Chr（13）回车符、Chr（10）换行符或两者组合来将各行分开。 9.8 常用操作方法 Buttons：用于指定显示按钮的数目和形式及使用的图标样式，为可选项。缺省情况下，命令按钮为“vbOkonly”，且没有图标。 Title：用于指定对话框标题栏中显示的字符串。缺省情况下，标题为“Microsoft Access”。 在调用该函数时，如中间某些参数省略时，分隔符“，”也不能省略。 例：显示结果如图9.4所示的消息框。 调用语句： MsgBox “Access基础教程”,vbOkCancel+vbInformation,”提示” 9.8 常用操作方法 9.8.2 输入框 输入框用于在一个对话框中显示提示信息并接受用户输入，当用户按下相应按钮后返回包含文本框内容的数据信息，同消息框一样，在VBA中也是以函数的形式调用的。 调用格式： InputBox（prompt[,title][,default][,xpos][ypos][,helpfile,context]） 参数说明： Prompt：用于指定显示在对话框的的消息，是必需指定的参数，最大长度为1024个字符。多行间可用Chr（13）回车符、Chr（10）换行符或两者组合来将各行分开。 Title：用于指定显示对话框标题栏中的字符串。缺省情况下，标题为“Microsoft Access”。 9.8 常用操作方法 Default：用于指定显示在文本框中的字符串表达式，在没有其他输入时作为缺省值。如果省略default，则文本框为空。 在调用该函数时，如中间某些参数省略时，分隔符“，”也不能省略。 例：显示如图9.5所示的输入框。 调用语句： InputBox “请输入院系”,”提示”,”外语学院” 9.8 常用操作方法 9.8.3 计时器 VBA并没有象VB中一样直接Timer时间控件的，但可通过设置窗体的“计时器间隔（TimerInterval）”属性与添加“