在窗体中有一个标签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．4