下列各赋值语句，语法不正确的是（ ）。

A．x+y=5	B．number=15
C．Label1.caption=time	D．length=x+y

小刘编写了一个求序列所有子序列和的程序。程序能够输 出所有的子序列的和，同时输出最大的子序列和。如序列中有三个元素 a(1)，a(2)，a(3)，其子序列包括“a(1)，a(2)”，“ a(1)，a(2)，a(3)”，“ a(2)，a(3)”。 程序运行界面如图所示。

实现上述功能的VB程序如下（数组每一项的值都为［-100,100］内的随机整数），请将程序代码补充完整。
Private Sub Command1_Click()
Dim  a(1 To 10) As Integer
Dim b(10) As Integer
Dim i As Integer, j As Integer
Dim k As Integer, max As Integer
Randomize
max=-32768
List1.Clear
List2.Clear
b(0)= 0
For i=1 To 10
a(i)=___________    '(1)
b(i)=b(i-1)+a(i)
List1.AddItem  Str(a(i))
Next i
For  I = 1 To 10
For  j=i+1  To  10
s="a("+Str(i)+")"+"至"+"a("+Str(j)+")"+"的和为"
k=_______________     '(2)
If  k>max Then  max=k
List2.AddItem s+Str(k)
Next j
Next i
Label3.Caption="子序列最大和为："+___________ '(3)
End Sub

在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

赋值语句y = x的功能是________。

A．x的值赋给y，x的值变为0

B．y的值赋给x，y的值变为0

C．y的值赋给x，y保留原来的值

D．x的值赋给y，x保留原来的值

下列各赋值语句，语法不正确的是（   ）。

A．x+y=5	B．number=15
C．Label1.caption=time	D．length=x+y