x是大于0小于45的数，用VB表达式表示正确的是（    ）

A．0<=x<45	B．0<=x<=45
C．0<x and x<45	D．0<=x and x<=45

在Visual Basic 中，下列优先级最高的运算符是(   )

A．*

B．\

C．<

D．Not

在VB中，设a=2，b=3，表达式a<b And b>=3值是（  ）

A．1

B．0

C．True

D．False

Sub test1()
a=320
a1="a\100"
a2=(a-100*a1)\10
a3="(a-100*a1-10*a2)"
B=100*a3+10*a2+a1
MsgBox B、
End sub
该程序的运行结果是 （  ）

A．320

B．32

C．230

D．23

商品条形码是一个13 位数,它是商品的“身份证”。条形码中前8位是厂商识别代码，接着4 位是商品项目代码，最后一位是校验码。校验码是由前12 位数按一定公式计算而得出的，其计算公式见下表

小明编写了一个VB程序，输入一个二维码后，点击“验证”按钮后，程序根据如上算法验证
条形码的验证码是否正确，代码如下所示：
Private Sub Command1_Click（）
Dim s As String，x As String
Dim js As Integer，os As Integer，jy As Integer
s =" Text1." Text
n = Len（s）
If n <> 13 Then
Label1.Caption = "条形码位数错误"
Else:学#科#网Z#X#X#K
For i =" 1" To 12
x = Val（Mid（s，i，1））
If _____①___________Then
js =" js" + x
Else
os =" os" + x
End If
Next i
End If
jy =" os" * 3 + js
jy = ______②____________
If  jy =" 10"  Then jy = 0
If  jy = Val(Mid(s，13，1))  Then
Label1.Caption = "验证码正确"
Else
Label1.Caption = "验证码错误"
End If
End Sub
(1)要实现如上VB程序，在窗体上至少有_____个控件对象(窗体除外)。
(2)要实现上述功能，程序中划线处①位置应填写的表达式是___________________
(3)要实现上述功能，程序中划线处②位置应填写的表达式是____________________
(4)若在该程序运行时，输入的待检测的二维码是“6921734953025”，执行上述程序，输出的
结果是________________________________