阅读以下应用说明及Visual Basic程序代码,将应真入______处的语句写在答题纸的对应栏内。 [应用说

阅读以下应用说明及Visual Basic程序代码，将应真入______处的语句写在答题纸的对应栏内。

[应用说明5.1]

应用程序的窗体中有1个下拉式列表框(名称为Combol)和2个文本框(名称分别为Txt1和Txt2)。运行时，用户从Combo1的列表中进行选择，程序就会将选中条目的内容及编号(从0开始)分别在文本框Txt1和Txt2中显示出来。

[程序代码5.1]

Private Sub Combol_Click()

Txt1，Text=Combol. (1)

Txt2．Text=Combol. (2)

End Sub

(注意：可供(2)处选择的选项有List，Index，ListIndex，LisCount，Number)

[应用说明5.2]

本应用程序的运行窗口如图2-1所示。

当用户在输入框(名为TxtIn)中输入数值数据，并从下拉式列表框(名称为CmbOp)中选择所需的运算后，输出框(名为TxtOut)中就会显示运算的结果。用户单击“清除”按钮(名为CmdClear)后，输入框和输出框都清空。

[程序代码5.2]

Private Sub CmbOp_Click()

Dim DataIn As Double，DataOut as Double

DataIn＝(3)

Select Case (4)

Case“取整数部分”

DataOut=Int(DataIn)

Case“求平方根”

If DataIn＜0 Then

MsgBox$(“负数不能开平方!”

Else

DataOut=Sqr(DataIn)

End If

Case“取绝对值”

DataOut=Abs(DataIn)

(5)

TxtOut.Text=str$(DataOut)

End Sub