窗体上有一个名称为Opt1的单选按钮控件数组,包含2个单选按钮,下标分别为1、2,标题分别为"显示图片"、"显示文本"。还有一个名称为Picture1的图片框和一个名称为Text1的文本框。工程文件的程序代码如下: Private Sub Form_Loa

admin2015-06-30  24

问题 窗体上有一个名称为Opt1的单选按钮控件数组,包含2个单选按钮,下标分别为1、2,标题分别为"显示图片"、"显示文本"。还有一个名称为Picture1的图片框和一个名称为Text1的文本框。工程文件的程序代码如下:
Private Sub Form_Load()
    Picture1.Picture = LoadPicture("e:\p1.bmp")
    Text1.Text = "VisualBasic"
    Picture1.Visible = False
    Text1.Visible = False
End Sub
Private Sub Opt1_Click(Index As Integer)
    If Index = 1 Then
        Picture1.Visible = True
        Text1.Visible = False
    End If
    If Index = 2 Then
        Picture1.Visible = False
        Text1.Visible = True
    End If
End Sub
对于上述程序代码,以下叙述中错误的是

选项 A、如果把If语句中的条件Index = 1改为Opt1=True ,不影响程序的正确执行
B、过程的参数Index对应于被选中单选按钮的下标
C、当单击"显示图片"单选按钮时,显示图片框及其中的图片
D、当单击"显示文本"单选按钮时,显示文本框及其中的文本

答案A

解析 过程的参数Index对应于被选中单选按钮的下标,当单击"显示图片"单选按钮时,Index=1;当单击"显示文本"单选按钮时,Index=2。故B项正确。当单击"显示图片"单选按钮时,Index=1,程序执行Picture1.Visible = True和Text1.Visible = False语句,图片可见,文本不可见;当单击"显示文本"单选按钮时,Index=2,执行 Picture1.Visible = False和 Text1.Visible = True程序,图片不可见,文件可见;故选项C和D正确。
转载请注明原文地址:https://jikaoti.com/ti/Mz60FFFM
0

最新回复(0)