单项选择题

下列程序的功能是返回当前窗体的记录集
Sub GetRecNum()
Dim rs As Object
Set rs=______
MsgBox rs.RecordCount
End Sub
为保证程序输出记录集(窗体记录源)的记录数，空白处应填入的语句是（）。

A.Recordset
B.ME.Recordset
C.RecordSource
D.ME.RecordSource

<上一题 目录 下一题>
热门 试题

单项选择题
ADO的含义是（）。

A.开放数据库互连应用编程接口
B.数据库访问对象
C.动态链接库
D.Active数据对象
单项选择题
在窗体中有一个命令按钮run1，对应的事件代码如下： Private Sub run1_Enter() Dim Bum As Integer Dim m As Interger Dim nAsInteger Dim i As Integer For i=1 To 10 num=InputBox( 请输入数据： ， 输入 ，1) If Int(num 2)=num 2 Then m=m+1 Else n=n+1 End If Nexti MsgBox( 运行结果：m= ＆Str(m)& ，n= &Str(n)) End Sub 运行以上事件所完成的功能是（）。

A.对输入的10个数据统计有几个是整数，有几个是非整数
B.对输入的10个数据求各自的余数，然后再进行累加
C.对输入的10个数据求累加和
D.对输入的10个数据统计有几个是奇数，有几个是偶数
相关试题