编写“二进制数转换为十六进制数”程序，实现如下功能：在文本框 Text1 输入一个二进制数，单击“转换”按钮 Command1，将二进制数转换为十六进制数并在文本框 Text2 中显示。程序运行界面如下图所示。

（1）设计如图所示的程序界面，至少要使用_____个类（填数字）。
（2）实现上述功能的 VB 程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim s1 As String, s2 As String
Dim i As Integer, x As Integer
Const code="0123456789ABCDEF"
s1=Text1.Text
s2=""
Do While Len(s1) Mod 4<>0 
s1="0"+s1
Loop
x=0
i=1
Do While i<=Len(s1)
x=x*2+Val(Mid(s1,i,1))  
i=i+1  
If ____________    Then ‘(1)
s2=s2+Mid(code,x+1,1)
______________  ‘(2)
End If
Loop
Text2.Text=s2
End Sub
（3）若文本框 Text1 中输入的内容为“101101” ，单击“转换”按钮后，文本框 Text2 中显示的内容是_______。

程序修改题，每小题①②③④处有1处错误，找出并改正

（1）下列程序的功能是在文本框Text1中显示变量a和b的较大值。 a = 1：b = 2 ① If a > b Then ②   c = a Else ③ c = b End If ④ Text1.Caption = Str(c) 错误在______处，改为_______________。

（2）下列程序的功能是标签Label1中显示1+2+3+…+10值。 Dim s As Integer Dim i As Integer ① s = 0 ② For i =" 1" To 10 ③   s = i Next i ④ Label1.Caption = Str(s) 错误在______处，改为_______________。

 

属性窗口中没有的是（    ）

A．对象下拉列表框

B．标题栏

C．选项卡

D．按钮

如图所示为某命令的按钮对象的属性窗口，若要编辑该对象单击事件的处理过程，则该事件处理过程名是（   ）

A．Command1_click	B．caption_click
C．cancel_click	D．撤销_click

下面VB程序的功能是判断一个整数是否为素数。在文本框Text1中输入一个整数x，如果x是素数，则在标签Label1中显示“Y”，否则显示“N”。程序中有两处错误，请改正。
Private Sub Command1_Click( )
Dim i As Integer，x As Integer，pd As Boolean
Val(Text1.Text)＝x
pd＝True
i＝1
Do While i＜x And pd＝True
If x Mod i＝0 Then
pd＝False
Else
i＝i＋1
End If
Loop
If pd＝True Then
Label1.Caption＝“Y”
Else
Label1.Caption＝“N”
End If
End Sub
错误语句1：________改为：________；
错误语句2：________改为：________。