2008年4月全国计算机等级考试二级笔试试卷access考试试题

（35）在窗体中有一个命令run35,对应的事件代码如下：privatesubrun35_enter()DimnumasintegerDimaasintegerDimbasintegerDimIasintegerForI=1to10Num=inputbox(“请输入数据：”,”输入”,1)Ifint(num/2)=num/2thenA=a+1ElseB=b+1EndifNextIMsgbox(”运行结果：a=”&str(a)&”,b=”&str(b))Endsub运行以上事件所完成的功能是A对输入的10个数据求累加和B对输入的10个数据求各自的余数，然后再进行累加C对输入的10个数据分别统计有几个是整数，有几个是非整数D对输入的10个数据分别统计有几个是奇数，有几个是偶数参考答案：一、选择：1、C2、A3、B4、B5、A6、D7、B8、C9、D10、C11、D12、A13、B14、B15、c16、B17、C18、C19、A20、C21、C22、D23、B24、A25、A26、D27、D28、A29、C30、B31、A32、D33、A34、C35、D二、填空1、输出2、163、244、菱形5、数据定义语言6、#7、参数8、-49、条件表达式的值10、Variant11、2512、num13、i14、fd+115、rs.MoveNext