在窗体中有一个标签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
B) 5
C) 10
D) 40

抢修故障车辆、施救车辆实施抢修或者施救时应当开启警示装置，并在来车方向（）以外设置警示标志。

A.50米

B.100米

C.150米

D.200米