用VB语言编写计算的算法。程序如下所示，循环结构可以用Do While语句或For语句，那么①中应入填写的是 ，②中应该填入的是 。
Sub Command1_Click()
Dim i As Integer, sum As Integer
sum = 0
Do while i <="n"
sum =" sum" +    ①    
②  
Next i
Text1.text = Str(sum)
End Sub

编写VB程序，实现如下功能：在文本框Text1、Text2中分别输入一个正整数，单击“计算累加和”按钮（Command1），在标签Label3中显示起始值和结束值之间所有奇数的累加和，界面如1图所示：
 
1图    2图
（1）在设计程序界面时，使用“控件工具箱”中（第11题-2图）的 （填编号）添加命令按钮，要使命令按钮Command1上显示“计算累加和”，应修改命令按钮的
属性值。
（2）为实现上述功能，请在划线处填入合适代码。
Private Sub Command1_Click()
Dim x1 As Integer,x2 As Integer,n As Integer
Dim sum As Long
x1=Val(Text1.Text)
x2=Val(Text2.Text)
sum=0
If  x1<x2  Then n="1" Else ①
For i=" x1" To x2 Step n
If   ②  Then
sum=sum+i
    ③
Next i
Label3.Caption=“从”& x1 & “到”& x2& “之间所有奇数的累加和=”&Str(sum)
End Sub

在Visual Basic中，语句x=Val(number.Text)中的number是（   ）

A．对象名	B．类名
C．属性名	D．属性值

在Visual Basic中，若要将100名学生家长的联系方式（如：0575-82291000）分别存储在数组Tel中，则下列说明语句最合适的是（ ）

A．Dim Tel(1,100) As Long	B．Dim Tel(1,100) As String
C．Dim Tel(1 To 100) As Long	D．Dim Tel(1 To 100) As String

写出下列表达式的值
(1) “20”+str(15) =_____________
(2) Len(“-100”)+100 =__________
(3) 103\10/5 mod 10=_____________
(4) Not (1>2) and (5<3)=____________

某两段VB程序分别如图1和图2所示：
 
图1  图2
当n的值为10时，关于该两段程序，下列说法不正确的是(  )

A．两段程序中i的初值相同

B．两段程序都采用了循环结构

C．两段程序的运算结果不相同

D．图1程序实现了“1＋3＋5＋7＋9”之和的运算

想产生区间[10,50]的随机整数，以下函数正确的是（   ）

A．Int(Rnd()*40+10)	B．Int(Rnd()*40+11)
C．Int(Rnd()*41+10)	D．Int(Rnd()*41+9)

有如下的程序段：
x=5:y=9
If  Not(x>y) then
x= x+y
else
x=x-y
End if
执行结束后，变量x的值为（  ）

A．-4

B．4

C．14

D．5

在Visual Basic中，语句Text1.Text=“red”执行后，文本框Text1 (    )

A．名称变为“red”	B．文字内容变为“red”
C．背景色变为红色	D．文字颜色变为红色

有如下VB程序段：
a =" 3:" b =" 4:" c = 5
If a >=" b" And a >=" c" Then
y = a
ElseIf b >=" c" Then
y = b
Else
y = c
End If
执行以上程序后，变量y值为（  ）

A．5

B．3

C．4

D．0