在窗体上有一个名称为Check1的复选框数组(含4个复选框),还有一个名称为Text1的文本哐,初始内容为空。程序运行时,单击任何复选框,则把所有选中的复选框后面的文字罗列在文本框中(如图1所示)。下面能实现此功

题目

在窗体上有一个名称为Check1的复选框数组(含4个复选框),还有一个名称为Text1的文本哐,初始内容为空。程序运行时,单击任何复选框,则把所有选中的复选框后面的文字罗列在文本框中(如图1所示)。下面能实现此功能的事件过程是( )。

参考答案和解析
正确答案:A
A)    【解析】本题考查复选框控件数组。复选框的Value属性,决定了当前复选框的状态,当Value为1时表示选中复选框。按照题目中的要求,首先清空文本框,接下来对复选框控件数组中的所有元素的Value属性一一筛查,判断是否选中,把选中的复选框控件的Caption属性值连接到文本框的字符串中。
如果没有搜索结果或未解决您的问题,请直接 联系老师 获取答案。
相似问题和答案

第1题:

窗体上有文本框Text1和若干复选框,以下程序的功能是:当复选框Check1选中时,设置文本框Text1上显示的文本字号20。
1;FontSize

第2题:

在考生文件夹中有工程文件sj4.vbp及其窗体文件sj4.frm,该程序是不完整的。 在窗体上有四个复选框,名称分别为Check1、Check2、Check3和Check4,标题分别为“足球”、“篮球”、“羽毛球”和“排球”。一个标签,名称为Label1,还有一个命令按钮,名称为Command1,标题为“选择结果”。要求程序运行后,如果选中某个复选框,当单击“选择结果”命令按钮时,则显示相应的信息。例如,如果选中“足球”和“羽毛球”复选框,单击“选择结果”命令按钮后,在标签上显示“我喜欢的运动是足球羽毛球”,如图8—4所示。注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“”’号),但不能修改其他部分。存盘时不得改变文件名和文件夹。


正确答案:
单击命令按钮触发Click事件,本题程序中主要是判断复选按钮的状态和在标签上显示复选按钮的Caption属性值,判断复选按钮的状态可以通过Value属性来实现。如果复选按钮被选中,则Value值为1,否则Value值为0。把复选按钮的Caption属性值赋给标签的Caption属性即可显示相应的文字。补充后的代码如下:
Privat(Sub Command1 Click
Dim str As String
str="我喜欢的运动是"
If Cheek1.Value Then
str=str+Check1.Caption
Else
str=str
End If
If Cheek2 Value Then
str=str +Check2.Caption
Else
str=str
End If
If Check3.Value Then
str=str+Check3.Caption
Else
str=Str
End If
If Check4.Value Then
str=str+Check4.Caption
Else
str=str
End If
Label1.Caption=str
End Sub

Private Sub Form_Load
Label1.Caption=""
End Sub
单击按钮运行程序,并按要求保存。

第3题:

在考生文件夹中有一个工程文件execise77.vbp及窗体文件execise77.frm。在名为Form1的窗体上有两个框架,其中一个框架中有两个单选按钮,另一个框架中有两个复选框,窗体上还有一个标题为“确定”的命令按钮和一个初始内容为空的文本框。所有控件已经全部画出。程序的功能是:在运行时,如果选中一个单选按钮和一个或两个复选框,则对文本框中的文字做相应的设置,如下图所示。

窗体上的控件已经绘制出,但没有给出主耍程序内容,请编写适当的事件过程,完成上述功能。

注意:

不能修改已经给出的程序部分和已有的控件;在结束程序运行之前,必须选中一个单选按钮和至少一个复选框,并单击“确定”按钮;必须通过单击窗体右上角的“关闭”按钮结束程序,否则无成绩。最后,按原文件名并在原文件夹中保存修改后的文件。


正确答案:

第4题:

在考生文件夹中有文件sj3.vbp及其窗体文件sj3.frm,该程序是不完整的。窗体上有一个名称为Text1的文本框;两个复选框,名称分别为Check1和Check2,标题分别为“Item1”和“Item2”;一个按钮,标题为“选择”。要求程序运行后,如果Check1和Check2都不选,单击窗体后,则在文本框中什么都不显示;如果只选中Checkl,单击按钮,则在文本框中显示“选中Item1”;如果只选中Check2,然后单击按钮,则在文本框中显示“选中Item2”;如果同时选中Check1和Check2,单击窗体,则在文本框中显示“不能全选”。程序运行时窗体显示如图1—3所示。注意:请在有“?”的地方填入正确内容,然后删除“?”及代码前的所有注释符(即“”号),但不能修改其他部分。存盘时不得改变文件和文件名。


正确答案:
根据题意,将两个名称分别为Check1和Check2的复选按钮、一个名称为Text1的文本框和一个名称为Command1的命令按钮放入到窗体中,复选按钮的Caption属性分别为Item1和Item2,Text1的Text属性为空,命令按钮的Caption属性为“选择”。双击Command1进入代码编写窗口,代码如下:
Private hub Command1 Click
If Check1.Value=1 Then 当选中Check1时
If Check2.Value=1 Then选中Check2
Text1.Text="不能全选"
在Text1中显示不能全选
Else 没有选中Check2
Text1.Text="选中Item1"
在Text1中显示选中Item1
End If
Else当没选中Check1时
IfCheck2.Value=1 Then选中Cheek2
Text1.Text="选中Item2"显示选中Item2
E1se
Text1.Text=""不显示
End If
End If
End Sub
单击按钮运行程序,并按要求保存。

第5题:

在窗体上有一个名称为Check1的复选框数组(含4个复选框),还有一个名称为Textl的文本框,初始内容为空。程序运行时,单击任何复选框,则把所有选中的复选框后面的文字罗列在文本框中(见图)。下面能实现此功能的事件过程是? A. Private Sub Check1_click(Index As Integer) Text1.Text = "" For k = 0 To 3 If Check1(k).Value = 1 Then Text1.Text = Text1.Text & Check1(k).Caption & " "?'双引号中是空格 End If Next k End Sub B. Private Sub Check1_Click(Index As Integer) For k = 0 To 3 If Check1(k).Value = 1 Then Text1.Text = Text1.Text & Check1(k).Caption & " " '双引号中是空格 End If Next k End Sub C. Private Sub Check1_Click(Index As Integer) Text1.Text = "" For k = 0 To 3 If Check1(Index).Value = 1 Then Text1.Text = Text1.Text & Check1(Index).Caption & " " '双引号中是空格 End If Next k End Sub D. Private Sub Check1_Click(Index As Integer) Text1.Text = "" For k = 0 To 3 If Check1(k).Value = 1 Then Text1.Text = Text1.Text & Check1(k).Caption & " " '双引号中是空格 Exit For End If Next k End Sub?


正确答案:D

第6题:

在窗体上画两个单选按钮(名称分别为Optionl、Option2,标题分别为“宋体”和“黑体”)、1个复选框(名称为Checkl,标题为“粗体”)和1个文本框(名称为Text1.Text属性为“改变文字字体”),窗体外观如图所示。程序运行后,要求“宋体”单选按钮和“粗体”复选框被选中,则以下能够实现上述操作的语句序列是( )


正确答案:D
Value属性用来表示复选框或单选按钮的状态。对于单选按钮来说,Value属性可设置为True或False。当设置为True时,该单选按钮是“打开”的,按钮的中心有一个圆点;如果设置为False,则该单选按钮是“关闭”的,按钮是一个圆圈。对于复选框来说,Value属性可以设置为0、1或2。其中:0——表示没有选择该复选框;1——表示选中该复选框;2——表示该复选框被禁止(灰色)。

第7题:

在窗体上画一个单选按钮和一个复选框,其名称分别为Option1和Check1,然后编写如下事件过程: Private Sub Option1_Click() Check1.Value = Option1.Value End Sub 程序运行后,如果单击单选按钮,其结果为______。

A.单选按钮与复选框的选中情况一致

B.出错

C.如果选中单选按钮Option1,则复选框Check1也被选中

D.如果不选中单选按钮Option1,则复选框Check1也不被选中


正确答案:B

第8题:

在窗体上画两个单选按钮,名称分别为Opfion1,Option2,标题分别为“宋体”和“黑体”;一个复选框,名称为Check1,标题为“粗体”:一个文本框,名称为Text1,Text属性为“改变文字字体”。要求程序运行时,“宋体”单选按钮和“粗体”复选框被选中,则能够实现上述要求的语句序列是( )。

A.Option1.Value=True Check1.Value=False

B.Oprion1.Value=True Check1.Value=Tme

C.Option2.Value=False Check1.Value=Tme

D.Optionl.Value=True Check1.Value=1


正确答案:D

第9题:

在窗体上画两个单选按钮,名称分别为Option1、Option2,标题分别为“宋体”和“黑体”;一个复选框,名称为Check1,标题为“粗体”;一个文本框,名称为Text1,Text属性为“改变文字字体”。要求程序运行时,“宋体”单选按钮和“粗体”复选框被选中(窗体外观如图16-2所示),则能够实现上述要求的语句序列是______。

A.Optionl. Value=True Checkl. Value=False

B.Optionl. Value=True Checkl. Value=True

C.Option2. Value=False Checkl. Value=True

D.Optionl. Value=True Checkl. Value=1


正确答案:D
解析:OptionButton(单选按钮)的Value属性应设置为True或False,而CheckBox(复选框)的Value属性应设置为0、1或2(对应控件常数为vbUnchecked、vbChecked或vbGraycd)。