在窗体中有一个标签Lb1和一个命令按钮Command1，事件代码如下：
Option Compare Database
Dim a AS String*10
Private Sub Command1_Click()
a=“1234”
b=Len(a)
Me.Lb1．Caption=b
End Sub
打开窗体后单击命令按钮，窗体中显示的内容是( )。

A) Sub Proc1(n，m)
B) Sub Proc1(ByVal n，m)
C) Sub Proc1(n，ByVa1 m)
D) Sub Proc1(ByVa1 n，ByVa1 m)

A) 数据库管理员
B) 用户
C) 数据库管理系统
D) 硬件系统