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

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

用来决定文本框中接收字符数多少的属性是( )

A．MAXLENGTH

B．PASSWORDCHAR

C．LOCKED

D．TEXT

编写“数字序列”程序，实现如下功能：在文本框Text1中输入100,500范围内的整数，单击“生成”按钮Command1，在列表框List1中显示9个该序列的数字。数字序列的生成规则为：该项的数字+该数百位上的数字+该数十位上的数字+该数个位上的数字=下一项的数字，例如：365+3+6+5=379。小明编写了VB程序，运行的界面如图所示，程序代码如下：

（1）代码“Private Sub Command1_Click()”中的Command1_Click()是_________。
（单选，填字母：

A．对象名

B．事件

C．事件处理过程

D．方法   ）

（2）为实现上述功能，请在划线处填入合适的代码。
Private Sub Command1_Click(   )
Dim n As Integer, i As Integer
Dim a As Integer,b As Integer
Dim c As Integer
List1.Clear
n = Val(Text1.Text)
If n >= 100 And n <= 500 Then
For i = 1 To 9
 
a = n \ 100
b = (n - 100 * a) \ 10
c = n Mod 10
_______________________
   
Next i

Else
List1.AddItem "输入数值有误"
End If

End Sub
（3）上述代码段中缺少了List1.AddItem Str(i)+"."+Str(n)，此句代码应该加在_____（填字母）位置。
（4）若输入的数字为123，则List1中第三行为__________________。

用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

小明在物理课堂上学了并联电阻的阻值计算知识（并联后的电阻阻值的倒数等于各个并联电阻阻值的倒数之和）后编写了一个计算并联电阻阻值的程序，程序界面如 16 题图所示。在文本框Text1中输入各个并联电阻的阻值以“，”为间隔，单击“计算”按钮 Command1 后，将这些电阻并联后的阻值计算结果显示在 Label4 中。

（1）要使程序运行后，窗体 Form1 的标题栏中显示“阻值计算”，正确的做法是________。（单选，填字母：

A．将窗体的 Text 属性改为 “ 阻值计算”/

B．在 Form_Load( ）事件中输入代码 Form1.Caption=“阻值计算”/

C．在 Form1_Load()事件中输入代码 Form.Name= “阻值计算”)

（2）实现上述功能的程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim s As String, r As String, ch As String
Dim Rs As Single   ‘Rs 变量表示并联后的总阻值
Dim i As Integer
s = Text1.Text
r = "": i = 1: Rs = 0
Do While _____________
ch = Mid(s, i, 1)
If ch <> , Then 
r = r + ch
Else
Rs = Rs + 1 / Val(r)
r = ""End If
i = i + 1
Loop
Rs = _____  Rs = 1 / Rs
Label4.Caption = _____
End Sub
(3) 如果在文本框 Text1 中输入“2,2,”后,单击“计算”按钮后，则程序的运行结果为__________ 。