在用计算机解决问题的过程中，寻找求解的方法和确定具体的求解步骤属于( )。

A．分析问题

B．设计算法

C．编写程序

D．调试运行

编写“数字序列”程序，实现如下功能：在文本框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中，代码RGB（0,0,255）表示什么颜色（   ）

A．红色

B．绿色

C．黄色

D．蓝色

小明编写了一个输出十进制与二进制数对应表的VB程序。程序运行时，单击“输出”按钮Command1后，在列表框List1中输出运行结果如第16题图所示。实现上述功能的VB代码如下，但加框处代码有错，请改正。

Dim b(4) As Integer   '数组b按位存储二进制数Private Sub pprint(m As Integer)  '本过程打印输出一行十进制数m和对应的二进制数'代码略
End Sub
Private Sub Command1_Click()
Dim i As Integer, j As Integer
List1.Clear
List1.AddItem "十进制数 二进制数"
For i =" 1" To 4
b(i) = 0
Next i
For i =" 0" To 15
Call pprint(i) '打印输出一行
j =   1 '(1)
b(j) =" b(j)" + 1
Do While  b(j) =" 0" '(2)
b(j) = 0
j =" j" - 1
b(j) =" b(j)" + 1  
Loop
Next i
End Sub

某VB程序的事件过程代码如下： 
Private Sub Command1_Click() 
Dim a As Integer
Dim s As String
s = "data:"
a =" Int(Rnd" * 90)
s =" s" + a 
Text1.Text = Str(a)
End Sub
程序运行后，单击命令按钮Command1，弹出如第8题图所示的错误提示信息，产生此错误的语句是（   ）

A．s = "data:"

B．a =" Int(Rnd" * 90)

C．s =" s" + a

D．Text1.Text = Str(a)