小明编写一个模拟qq登录的VB程序。当输入用户名、密码和验证码，点击登录按钮后，会跳出信息框提示是否验证成功。部分程序与流程图如下所示：

uname = Text1.Text '输入用户名
psd = Text2.Text    '输入密码
vcode = Val(Text3.Text) '输入验证码
If vcode <> Val(Label3.Caption) Then
MsgBox “” ' Label3显示的是随机验证码
ElseIf uname <> "admin" Or psd <> "123456" Then
MsgBox “    ”
Else
MsgBox “    ”
方框中正确的语句是（ ）。

A．①中“验证成功”	B．②中“输出用户名或密码有误”
C．②中“验证成功	D．③中“输出验证码错误”

在Visual Basic 中，若x、y都是正整数且x能被y整除，则下列关系表达式值一定为真的是（   ）

A．x mod y =0

B．x<>y

C．x mod 2 =0

D．x/y=0

在窗体上画一个命令按钮，名称为command1，单击命令按钮，执行如下事件过程：
Private Sub Command1_Click() 
Dim a As String
Dim c As String
a = "software and hardware"
c =" Mid(a," 14, 8)
Text1.text = c
End Sub
则在文本框Text1中显示的信息是（   ）

A．software and hardware

B．software

C．hadrware

D．and

填空题：（共8分，每小题2分）。
（1）  本程序中，变量a、b 的数据类型都是___________（填写中、英文均可）。

（2）以上代码中，表示输出语句的是第____行。
（3）本程序中，代码a=a+b的含义是_____（选填Ⅰ或Ⅱ）。
选项:Ⅰ.把a的值赋给a+b
Ⅱ.把a加b的和赋给a
（4）若输入的两个数分别是10和20，则程序执行完毕，变量a的值是____，变量b的值是____。

有一组数：1、2、4、7、……，其第1个数是1，第2个数比第1个数大1，第3个数比第2个数大2，第4个数比第3个数大3，以此类推。求其前20项的和。
以下VB程序实现上述功能，请把程序中的①、②出填写完整。
Dim i As Integer, p As Integer, s As Integer
i = 1
p = 1
s = 0
Do While ______①______
s =" s" + p
i =" i" + 1
______②______
Loop
Print s