在窗体上画一个命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
a$=InputBox("请输入一个二进制数"):n=Len(a$)
For i=1 To n
Dec=Dec*2+______(a$,i,1)
Next i
Print Dec
End Sub
程序功能为：单击命令按钮，将产生一个输入对话框，此时如果在对话框中输入一个二进制数，并单击“确定”按钮，则把该二进制数转换为等值的十进制数。这个程序不完整，应在横线处填入的内容是

单项选择题以下程序的功能是随机产生10个两位的整数：Option Base 1Private Sub Command1_Click()Dim a(10)As Integer, i As IntegerRandomizeFor i=1 To 10a(i)=Int(Rnd*100)+1:Print a(i)Next iEnd Sub运行以上程序，发现有错误，需要对产生随机数的语句进行修改。以下正确的修改是

单项选择题窗体上有名称分别为Text1、Text2的文本框，名称为Command1的命令按钮。运行程序，在Text1中输入“FormList”，然后单击命令按钮，执行如下程序：Private Sub Command1_Click()Text2.Text=UCase(Mid(Text1.Text,5,4))End Sub在Text2中显示的是