D) 文本框如果位于报表页脚，则输出本页记录总数
【解析】 页面页眉主要用来显示列名称和每页都要使用的信息，不用于统计页面记录数。所以在页面页眉中添加文本框控件没有统计记录的作用，因此A选项和C选项错误，使用表达式“=Count(*)”时，由于计算控件放置位置的不同，统计的记录范围是不同的。当文本框放在组页眉或组页脚时，统计的是分组的记录数，当文本框控件放在报表页眉或报表页脚时，统计的是所有的记录数。由于按“学院”分组，因此B选项中当文本框位于学院页眉时，统计的是本学院的记录总数，故B选项正确；而D选项当文本框位于报表页脚时统计的应为整个报表的记录总数，故选项D错误。因此，本题应选择B选项。
已知费用审核窗体如下图所示。审核时，如果费用超过800无，则备注栏显示\请主管签字确认\，啊如果费用未超过则显示计算出的费用合计。下列选项中，文本框txtBZ的控件来源表达式书写错误的是
A) = IIf( txtSL * txtDJ >= 800, \请主管签字确认\费用合计\￥\ B) = IIf( [txtSL]*[txtDJ]>=800, \请主管签字确认\费用合计\￥\ C) = IIf( [txtSL]*[txtDJ]>=800, \请主管签字确认\费用合计\￥\ D) = IIf( [txtSL]*[txtDJ]>=800, \请主管签字确认\费用合计\￥\
【解析】连接运算符“+”的左右两边必须是字符型，C选项中第二个“+”的右侧是数字，故C选项错误。因此，本题应选择C选项。
窗体中有文本框Text1。运行程序，输入大于0的整数m，单击按钮Command1，程序显示由星号 组成的高度和边长均为m的平行四边形。例如，当m=5时，显示图形如下。 * * * * * * * * * * * * * * * * * * * *
* * * * * 事件代码如下。
Private Sub Command1_Click() m = Val(Me!Text1) result = \ For k = 1 To m
For n = 1 To 【 】 If n < m - k + 1 Then result = result & \ Else
result = result & \ End If Next n
result = result + Chr(13) Next k
MsgBox result, , \运行结果\End Sub
程序【 】处应填写的语句是
A) 2 * m - k B) 2 * m C) m - k + 1 D) 2 * m - k + 1
【解析】本题考查的是for循环的条件。本题第一行用于控制输出的行数，第二个用于控制每行的字符数（空格和“*”）。随着行数的增加，每一行的字符数逐渐减少。从图中我们可以看出规律。第一个是四个空格和五个*，共计9个字符；第二行是3个空格和5个*，共计8个字符；...，所以满足条件的只有选项A 。因此，本题应选择A选项。
登录窗体如图所示，单击\登录\按钮，当用户名正确则弹出窗口显示\信息。
按钮cmdOK对应的事件代码是
A) Private Sub cmdOK_Click()
If txtUser.Value = \ End Sub
B) ) Private Sub cmdOK_Click()
If txtUser.Value = \ MsgBox \ End Sub
C) Private Sub cmdOK_Click()
If txtUser.Value = \ MsgBox \ Endif End Sub
D) Private Sub cmdOK_Click()
If txtUser.Value = \ MsgBox \ End If End Sub
【解析】本题考查是if ...then ... end if语句的语法。A 选项中一行写了多条语句，中间需要用“：”隔开，并且当if <条件>then <语句>写在同一行时，可不用end if；B选项缺少“end if”；D选项缺少关键字then。因此，本题应选择C选项。
窗体中有文本框Text1、Text2和Text3。运行程序时，输入整数m和n(n>0)，单击按钮Command1计算下列表达式的值：
Sum=m-(m+1)+(m+2)-(m+3)+…+(-1)(m+n-1)
Text3给出结果。事件代码如下： Private Sub Command1_Click()
m=val(me!text1) n=val(me!text2) sum=0 For k=1 to n
sum=sum+【 】 Next k Me!text3=sum
n+1
End Sub
程序【】处应填写的语句是
A) IIf(k Mod 2 = 0, -(m + k - 1), (m + k - 1)) B) IIf(k Mod 2 = 0, (m + k - 1), -(m + k - 1)) C) IIf(k Mod 2 > 0, -(m + k - 1), (m + k - 1)) D) IIf(k Mod 2 < 0, (m + k - 1), -(m + k - 1))
【解析】本题是求解一个表达式的值。从题目中我们可以找出规律，第k项，如果k是奇数则为“+（m+（k-1））”，否则为“-（m+（k-1））”。很容易我们可以看出，本题满足条件的只有选项A。因此，本题应选择A选项。
窗体中有文本框Text1、Text2和Text3。运行程序时，输入整数m和n(n>0)，单击\计算\按钮Command1计算下列表达式的值：
Sum=m-2(m+1)+3(m+2)-4(m+3)+…+(-1) n(m+n-1)n
Text3给出结果。事件代码如下： Private Sub Command1_Click()
m=val(me!text1) n=val(me!text2) sum=0 For k=1 to n
sum=sum+【 】 Next k Me!text3=sum
n+1
End Sub
程序【】处应填写的语句是
A) IIf(k Mod 2 = 0, -k, k) * (m + k - 1)
B) IIf(k Mod 2 = 0, k, -k) * (m + k - 1) C) IIf(k Mod 2 > 0, -k, k) * (m + k - 1) D) IIf(k Mod 2 < 0, k, -k) * (m + k - 1)
【解析】本题考查的是通过一个for循环实现一个表达式的求值。该表达式共n项，for循环中k从1到n，从表达式中我们可以找出规律:如果k为奇数，则该项前面符号为“-”，否则符号为“+”（注：(k Mod 2 = 0， -k， k) * (m + k - 1)等同于(k Mod 2 = 0， -k* (m + k - 1)， k * (m + k - 1)）。因此，本题选择A选项。
窗体中有文本框Text1、Text2和Text3。运行时在Text1中输入整数m，在Text2中输入整数n（m Me!Text3 = count0 End Sub 程序【 】处应填写的语句是 A) count0 + IIf(k Mod 9 = 0, 1, 0) B) count0 + IIf(k Mod 9 <> 0, 1, 0) C) IIf(k Mod 9 > 0, count0 + 1, count0 + 0) D) IIf(k Mod 9 < 9, count0 + 1, count0 + 0) 【解析】本题求解m到n中（m VBA中一般采用Hungarian符号法命名变量，代表命令按钮的字首码是 A) cmd B) txt C) Chk D) sub