下列关于“控件”属性的说法正确的是( )

A．控件的每一个属性都具有同样的默认值；

B．所有对象都具有同样的属性；

C．控件的属性只能在设计时设置，不能在运行时修改；

D．单击窗体中某控件，在属性窗口中的属性列表框中找到要设置的属性，即可设置其属性值；

对下列程序段的说法正确的是（   ）
Private sub Command1_Click()
Dim s, i As Integer
s=0
i=1
For i="1" to 4  step 2
s=s+i^2
Next i
Print "s=";S
End Sub

A．该程序段执行后s的值为10

B．该程序段执行后s的值为30

C．该程序段执行后i的值为4

D．该程序段执行的结果为s=10

程序代码拼装题：设计程序功能为输入三个整数，按从小到大顺序输出。
要求：将下面三个代码块（可重复使用，也可不用）正确插入程序中，使其能完成题目要求功能。

源程序如下：
Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer
a = InputBox("输入第一个整数：")
b = InputBox("输入第二个整数：")
c = InputBox("输入第三个整数：")
'''在下面插入三段代码



Text1 =" a" & "  " & b & "  " & c
End Sub

输入两个在 1 和 9 之间的正整数 a 和 n ，求 a+aa+aaa+aaaa+…+a…a（n 个 a）之和｡为解决该问题，小明设计了一个 VB程序，在文本框 Text1 中输入 a 的值，在文本框 Text2 中输入 n的值，单击“计算”按钮 Command1，在列表框 List1 中输出每次相加的等式和结果，界面如图所示｡

（1）要使程序运行时，文本框 Text1 的文字大小 FontSize 属性值设置为 12，可在 Form_Load 事件过程中添加语句__________________（单选，填字母：

A．FontSize = 12 /

B．Text1. FontSize =12 /

C．FontSize. Text1=12）｡

（2）实现上述功能的 VB 程序如下，请在划线处填入合适的代码｡
Private Sub Command1_Click()
Dim a As Long, n As Integer, s As Long
Dim s1 As String, t As Long
a =Val(Text1. Text)
n =Val(Text2. Text)
If a < 1 Or a > 9 Then
List1. AddItem "输入 a 的值无效"
ElseIf n < 1 Or n > 9 Then
List1. AddItem "输入 n 的值无效"
Else
s = a: t = a
s1 =Str(t)
List1. AddItem s1 +"=" + Str(s)
i =  ①__________ 
Do While i <= n
②__________ 
s = s + t
s1 = s1 + "+" +Str(t)
List1. AddItem s1 + "=" + Str(s)
③__________
Loop
End If
End Sub

在VB中，定义数组d，用于存储10个学生的年龄，数组定义为dim d(1 to 10) as integer，下列有关数组d的说法正确的是（   ）

A．d是由9个整数变量构成的一个一维数组变量，且第一个元素为d(1)

B．d是由9个整数变量构成的一个一维数组变量，且最后一个元素为d(10)

C．d是由10个整数变量构成的一个一维数组变量，且第一个元素为d(0)

D．d是由10个整数变量构成的一个一维数组变量，且最后一个元素为d(10)