小明设计了如下所示累乘器程序，以完成式子：1×2×3×4×5×6的累乘计算。
Private Sub form_load()
Dim k As Long, i As Integer 
k = 0 ……… ①
For i =" 1" To 6 
k =" k" * i   ……… ② 
Next i 
MsgBox Str(k)
End Sub 
为了完成小明的计算，程序中标有①、②的两处语句，哪个语句应作相应的修改，修改后其正确的语句为（写出标号和正确的语句）_____________。

小金编写了VB程序，部分程序如下所示，在调试程序的时候出现如图所示的错误信息：
Private Sub Command1_Click()
Dim x As String, i As Integer
For i =" 1" To 10
If i Mod x =" 1" Then
x = "奇数"
Else
x = "偶数"
Next i
……
End Sub

产生此错误的语句是(   )。

A．For	B．End If
C．Next	D．If

有如下 VB 程序段：
Private Sub Commandl_Click()
Dim s As String, res   As String, ch As String
Dim i As Integer
s=Textl.Text:res="":ch=""
For i=1 To Len(s)
ch=Mid(s,i,l)
If Not(ch>="0"And ch<="9"＝Then
res=ch＋res
End If
Next i
Labell.Caption=res
End Sub
在文本框 Textl 中输入“Qns 2020_GK”后单击按钮 Command1，在标签Labell 中显示（   ）

A．Qns_GK

B．QnsGK

C．KG_snQ

D．KGsnQ .

下列VB程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是（1）   ，文本框Text2中显示的内容是____（2）  。
Private Sub Command1_Click()
Dim i As Integer, c As Integer, n As Integer
c =" 0:" n = 10
For i =" 1" To n
If n Mod i =" 0" Then c =" c" + 1
Next i
Text1.Text = Str(n)
Text2.Text = Str(c)
End Sub

“如果a，b中任意一个为0，那么y＝y＋1”。能实现该功能的VB语句是(　　)

A．If  a＝0 And b＝0 Then y＝y＋1	B．If  a+b＝0 Then y＝y＋1
C．If  a＝0 or b＝0 Then y＝y＋1	D．If  a/b＝0  Then y＝y＋1