编写VB程序，求最小公倍数。在文本框Text1和Text2中分别输入两个数，单击“计算”按钮Command1，求出这两个数的最小公倍数，并在标签Label3 中输出结果。界面如图所示：
 
第1图    第2图
（1）在设计程序界面时，应使用第19题－2图所示“控件工具箱”中的__________（填相应编号）添加标签控件。要让Command1显示为“计算”，需要在属性面板中修改___________的值为“计算”。
（2）程序代码如下：
Private Sub Command1_Click()
Dim a As Integer, b As Integer, r As Integer
Dim a1 As Integer, b1 As Integer, g As Integer
a1 = Val(Text1.Text)
b1 = Val(Text2.Text) 
a = a1
b = b1
Do While b <> 0
r =" a" Mod b
a = b
b = r
Loop
g =" a1" * b1 / a
    ①     
End Sub
完善此程序，则①处应填入_______________。

下列VB表达式的值等于13的是( )

A．Val("11") + 2	B．Str(11) + "2"
C．Sqr(11) + 2	D．Len("11") + 2

编写一段程序求1Í2Í3Í……Í100的值，程序代码如下：
Private Sub Command1_Click()
Dim i As Integer, t As Integer
t = 1
For i =" 1" To 100
    ①    
Next i
Text1.Text = Str(t)
End Sub
（1）  请补充①处的代码___________________。
（2）  运行此程序，单击Command1按钮，出现对话框如图所示：

请分析出现该错误的原因__________，如何修改可以解决此问题_______________________。

下列VB程序段
Dim x As Single, y As Single
x = Val(Text1.Text)
If x > 10 Then
y =" x" * x
ElseIf x > 0 Then
y =" 10" * x
Else
y = 0
End If
Text2.Text = Str(y)
要测试所有分支程序代码是否正确，以下测试数据中，最恰当的一组是(    )

A．11，2，-1	B．0，10
C．-2，2，5	D．12，100，-1

某VB程序在调试中弹出以下错误窗口，产生该错误的可能原因是（   ）

A．该VB程序代码中缺少Next

B．该VB程序窗体界面中，缺少某控件

C．该VB程序代码中，某个常量或变量没有声明

D．该VB程序设计软件没有正确安装

下列VB函数返回值为数值的是：（   ）

A．Chr(x)

B．Str(x)

C．Val(x)

D．Mid(x,n,k)

该同学有个好朋友也在学习VB，想要这个程序的源文件，这个同学应该把程序为下列哪种文件格式发给好友？（   ）

A．FRM

B．JPG

C．EXE

D．PSD

该程序的界面如右图所示：
如果要把窗口标题处的“Form1”修改
为“计算团购优惠”，应该选择以下哪个语句？（   ）

A．form1.text=”计算团购优惠”	B．form1.caption=”计算团购优惠”
C．form1.font=”计算团购优惠”	D．form1.coption=”计算团购优惠”

下列哪种图形代表流程图中的判断框？（  ）

A．	B．
C．	D．

（    ）是编程加工的核心。

A．算法设计

B．界面设计

C．代码编写

D．调试运行