变量a 中存储了一个字符,能够正确判断该字符为数字字符“0”~ “9”的VB 表达式是(  )

A．Asc(a)>=0 Or Asc(a)<=9	B．“0”<=a<=“9”
C．a<=“0”Or a>=“9”	D．a>=“0”and a<=“9”

随机产生集合{-1,1}中任意一个数的VB表达式是（   ）

A．Int(Rnd*2)-1

B．Int(Rnd*3)-1

C．Int(Rnd *3)\2-1

D．Int(Rnd *2)*2-1

有如下VB程序段：
Dim a(1 To 6)As Integer
n=6：i=1
Do While i <=n

x=Int(Rnd * 10)+1

If i Mod 2=x Mod 2 Then

a(i)=x
i-i+1
Else
a(n)=x
n=n-1
End If
Loop执行该程序段后，在下列选项中，a数组各元素的值可能是（   ）

A．3，4，0，6，6，8	B．1，8，9，11，1，5
C．2，5，8，6，7，10	D．5，3，3，7，7，3

小王编写了一个统计多选题分数的VB程序。得分规则是：多选题共有6个候选项（A、B、C、D、E、F），全部答对得2分，部分答对得1分，未作答或有错误答案0分。设计一个能够评分的程序，要求如下：在文本框Text1中输入标准答案，在文本框Text2中输入学生答案（输入时必须按字母从小到大顺序输入）。点击评分按钮Command1后，将得分显示在标签Label4中。程序界面如题图所示：
（1）要使程序运行后，窗体Form1的标题栏中显示“评分”，正确的做法是______（单选，填字母）

A．将窗体的Text属性改为“评分”

B．在Form_Load()事件中输入代码 Form1.Caption="评分"

C．在Form1_Load()事件中输入代码

Form．Name="评分"
（2）实现上述功能的程序如下，请在划线处填入合适的代码：
Private Sub Command1_Click()
Dim cans As String ,ans As String ,ch As String ,c As Integer
Dim f(1 To 6) As Boolean
cans = Text1.Text
ans = ①____________
c = 0
For i = 1 To 6
f(64+i)=False
Next i
For i = 1 To Len(cans)
ch = Mid(cans, i, 1)
f(Asc(ch) - 64) = True
Next i
For i = 1 To ②___________     
ch = Mid(ans, i, 1)
If f(Asc(ch) - 64) = False Then
c = 0: Exit For
Else
c  = c + 1
End If
Next i
If c = 0 Then
Label4.Caption = "0分"
ElseIf c = Len(cans) Then    
Label4.Caption = "2分"
Else
Label4.Caption = "1分"
End If
End Sub
（3）若去除加框处代码，且将文本框Text2的内容改为“BCD”，标签Label4显示的内容是________。

Y为分段函数

求y的值。完成该流程图，在空白处填入_____

A．x mod 2 <> 0

B．x / 2 = 0

C．x =" 2" * n-1

D．x \ 2 = 0