对象是由一组表示对象状态的数据和一组描述处理对象属性的方法(行为)的代码构成；（   ）

小明编写了一个输出十进制与二进制数对应表的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

文本框没有(    )属性.

A．TEXT

B．LOCKED

C．CAPTION

D．PASSWORDCHAR

查找最大的ASCII码字符。随机生成n（n>=40）个可见ASCII码的字符串（可见字符ASCII码的范围是33~126），并显示在文本框Text1中。单击“查找”按钮运行程序，在标签Label1中输出该字符串中最大的ASCII码值及对应的字符。程序界面如图所示，VB代码如下。请回答下列问题：

（1）要使程序运行时，窗体Form1标题显示“查找ASCII最大的字符”，则需在Form_Load事件过程中添加语句________（单选，填字母：

A．Form1.Text="查找ASCII最大的字符" /

B．Form1.Caption= "查找ASCII最大的字符"/

C．Form1.AddItem "查找ASCII最大的字符"）

（2）实现上述功能的VB程序如下，请在划线处填入合适代码。
Const n = 40
Private Sub Command1_Click()
Dim s As String, ch As String
Dim i As Integer, max As Integer
s = Text1.Text
max = 0
For i = 1 To Len(s)
ch = ____________ 
If Asc(ch) > max Then max = Asc(ch)
Next i
Label1.Caption = "最大ASCII码:" + _______ + " 该字符为:" + Chr(max)
End Sub
Private Sub Form_Load()   ’随机生成可见字符并显示在文本框Text1中
Randomize
For i = 1 To n
Text1.Text = Text1.Text + _______________
Next i
End Sub

有一个对象属性面板如图所示，这是（   ）

A．窗体控件

B．属性控件

C．按钮控件

D．标签 Lable 控件