（34）在窗体中有一个命令按钮Command1，编写事件代码如下：
Private Sub Command1_Click()
Dim s As Integer
s = p(1) + p(2) + p(3) + p(4)
debug.Print s
End Sub
Public Function p (N As Integer)
Dim Sum As Integer
Sum = 0
For i = 1 To N
Sum = Sum + 1
Next i
P = Sum
End Function
打开窗体运行后，单击命令按钮，输出的结果是
A）15
B）20
C）25
D）35
（35）下列过程的功能是：通过对象变量返回当前窗体的Recordset属性记录集引用，消息框中输出记录集的记录（即窗体记录源）个数。
Sub GetRecNum( )
Dim rs As Object
Set rs = Me.Recordset
MsgBox-----
End Sub
程序空白处应填写的是
A）Count
B）rs.Count
C）RecordCount
D）rs. RecordCount
上一页 [1] [2] [3] [4] [5] [6] [7] [8] [9] [10] ... 下一页 >>
