单项选择题

下列过程的功能是：通过对象变量返回当前窗体的Recordset属性记录集引用，消息框中输出记录集的记录(即窗体记录源)个数。
Sub GetRecNum()
Dim rs As Object
Set rs=Me.Recordset
MsgBox[ ]
End Sub
程序括号内应填写的是（）。

A．Count
B．rs.Count
C．RecordCount
D．rs.RecordCount

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

单项选择题
Msgbox函数返回值的类型是______。
A．数值
B．变体
C．字符串
D．数值或字符串(视输入情况而定)
单项选择题
数据库中有数据表“Emp”，包括“Eno”、“Ename”、“Eage”、“Esex”、“Edate”、“Eparty”等字段。下面程序段的功能是：在窗体文本框“tValue”内输入年龄条件，单击“删除”按钮完成对该年龄职工记录信息的删除操作。 Private Sub btnDelete_Click() ’击 删除 按钮 Dim strSQL As String ’定义变量 strSQL= delete from Emp ’赋值SQL基本操作字符串 ’判断窗体年龄条件值无效(空值或非数值)处理 If IsNull(Me!tValue)=True Or IsNumeric(Me!tValue)=False Then MsgBox 年龄值为空或非有效数值! ，vbCritical， Error ’窗体输入焦点移回年龄输入的文本框 tValue 控件内 Me!tValue.SetFocus Else 构造条件删除查询表达式 strSQL=strSQL& where Eage= &Me!tValue ’消息框提示 确认删除(Yes No) ，确认后实施删除操作 If______Then DoCmd.RunSQL strSQL 。执行删除查询 MsgBox”completed!Il，vbInformation，”Msg” End If End If End Sub 按照功能要求，在横线上应填写的是______。
A．MsgBox("确认删除(Yes/No)"，vbQuestion+vbYesNo，"确认")=vbOk
B．MsgBox("确认删除(Yes/No)"，vbQuestion+vbYesNo，"确认")=vbYes
C．MsgBox("确认"，vbQuestion+vbYesNo，"确认删除(Yes/No)")=vbOk
D．MsgBox("确认"，vbQuestion+vbYesNo，"确认删除(Yes/No)")=vbYes
相关试题