计算机程序设计
在窗体上画两个单选按钮，名称分别为Option1、Option2，标题分别为"宋体"和"黑体"；一个复选框，名称为Check1，标题为"粗体"；一个文本框，名称为Text1，Text属性为"改变文字字体"。要求程序运行时，"宋体"单选按钮和"粗体"复选框被选中，则能够实现上述要求的语句序列是（）A、Option1.Value=TrueCheck1.Value=TrueB、Option1.Value=TrueCheck1.Value=FalseC、Option2.Value=FalseCheck1.Valu
题目
在窗体上画两个单选按钮，名称分别为Option1、Option2，标题分别为"宋体"和"黑体"；一个复选框，名称为Check1，标题为"粗体"；一个文本框，名称为Text1，Text属性为"改变文字字体"。要求程序运行时，"宋体"单选按钮和"粗体"复选框被选中，则能够实现上述要求的语句序列是（）
- A、Option1.Value=TrueCheck1.Value=True
- B、Option1.Value=TrueCheck1.Value=False
- C、Option2.Value=FalseCheck1.Value=True
- D、Option1.Value=TrueCheck1.Value=1
相似问题和答案
第1题：
（22）在窗体上画两个单选按钮，名称分别为Option1和Option2，标题分别为“黑体”和“楷体”；一个复选框，名称为Check1,标题为“粗体”。要求程序运行时，“黑体”单按钮和“粗体”复选框被选中，则能够实现上述要求的语句序列是A.Option1.Value=True B.Option1.Value=True Check1.Value=False Check1.Value=TrueC.Option2.Value=False D.Option1.Value=TrueCheck1.Value=True Check1.Value=1
【解析】Value属性用来返回或设置复选框和单选按钮的状态。单选按钮的该属性有两个值：默认值False表示未选中，True表示选中。复选框的Value属性用来返回或设置控件的状态，它可取3种属性值：当取0时，表示未选中（默认值）；当取1时，表示选中；当取2时，表示为变灰。运行时只有0和1两种状态。
第2题：
在窗体上创建两个单选按钮，名称分别为Option1和Option2，标题分别为“100到300之间的质数”和“200到400之间的质数”，以及一个文本框，名称为Text1。在窗体上创建两个命令按钮，名称分别为Command1和Command2，标题分别为 “计算”和“保存数据”。编写事件过程，程序运行后，单击“计算”按钮，则计算出该单选按钮标题所指明的所有质数之和，并在文本框中输出。单击“保存数据”，存入out.txt文件中，该文件必须放在考生文件夹中(在考生文件夹中有标准模块module1.bas，其中的savedata过程可以把计算结果写入指定文件，用check函数可以判断某整数是否为质数，是则返回True，否则返回False。)程序运行界面如图30所示。要求实现题目给出的功能，并将文件保存在考生文件夹下，工程文件名为ylc.vbp。
(1)Visual Basic集成环境中，执行“文件”→“打开工程”命令，选择ylc.vbp文件打开。 (2)执行“工程”→“添加模块”命令，在“打开模块”对话框中，打开“标准模块” modulel.bas。 (3)在工具箱中选择单选按钮控件，在窗体上创建两个单选按钮，名称分别为Option1和Option2，标题分别为“100到300之间的质数”和“200到400之间的质数”。 (4)在窗体上创建命令按钮名称分别为Command1和Command2，标题分别为“计算”和“存盘”。 (5)定义模块级数组，在模块的声明段声明，其代码如下： Dim a(1 To 100) As Integer Dim count As Integer (6)双击“计算”按钮，弹出代码窗口，在其中添加如下代码： Dim count As Integer Private Sub Command1_Click() Dim i As Integer If Optionl，Value Then For i=100 To 300 If module1.check(i) Then count=count+i End If Next i Else For i=200 To 400 If module1.check(i) Then count=count+i End If Next i End If Text1.Text=count End Sub (7)调用savedata过程，把文件中的数值读到指定的数组中保存事件。其代码如下： Private Sub Command2_Click() Dim str As Integer str=CStr(count) Call module1.SaveData("out.txt", count) End Sub (8)双击“保存数据”按钮弹出代码窗口，在其中添加如下代码： Private Sub Command3_Click() Call SaveData(Text1.Text) End Sub Sub SaveData(str As String) Open app.Path & "\"&"out.txt"For Output As #1 Print count Close#1 End Sub (9)按F5键运行程序。如图30所示。 (10)执行“文件”一“保存工程”命令，将工程文件命名为ylc.vbp，窗体文件命名为 ylc.frm。 解析：(1)本题是一个综合应用题，根据题目的要求添加模块、创建单选按钮、命令按钮及文本框，并设置其属性。(2)在命令按钮的单击事件中，调用模块中的函数过程，判断质数，并累计某段区间的质数总和。在文本框中输出结果，并将该结果写入指定文件中。
第3题：
表单里有一个选项按钮组，包含两个选项按钮Option1和Option2，假设Option2没有设置Click事件代码，而Option1以及选项按钮组和表单都设置了Click事件代码，那么当表单运行时，如果用户单击Option2，系统将( )。
A．执行表单的Click事件代码
B．执行选项按钮组的Click事件代码
C．执行Option1的Click事件代码
D．不会有反应
解析：在选项按钮组中，如果设置了选项按钮组的Click事件，而没有设置选项按钮的Click事件，当单击选项按钮时，则会执行选项按钮组的Click事件。
第4题：
请根据以下各题的要求设计Visual Basic应用程序(包括界面和代码)。
1．在窗体(名称为Form1)上画两个命令按钮，其名称分别为C1和C2，标题分别为“命令按钮1”和“命令按钮2”，编写适当的事件过程。程序运行后，“命令按钮2”隐藏，此时如果单击“命令按钮1”，则“命令按钮2”出现，“命令按钮1”隐藏；而如果单击“命令按钮2”，则“命令按钮1”出现，“命令按钮2”隐藏。程序的运行情况如图1—1所示。注意；存盘时，工程文件名为sjt1.vbp．窗体文件名为sjt1.frm。
2．在Form1的窗体上画一个命令按钮，其名称为C1，标题为“显示”；再画一个文本框，其名称为Text1，编写适当的事件过程。程序运行后，在窗体加载时使文本框不可见，如果双击窗体，则文本框出现；此时如果单击命令按钮，则在文本框中显示“等级考试”。程序运行情况如图1—2所示。
第5题：
在考生文件夹中有一个工程文件execise100.vbp及窗体文件execise100.frm。请在名为 Form1的窗体上绘制两个框架(如下图所示)其名称分别为Frame1和Frame2，标题分别为“交通工具”和“到达目标”。在Frame1中绘制两个单选按钮，名称分别为Opt1和Opa，标题分别为“飞机”和“火车”。在Frame2中绘制两个单选按钮，名称分别为Opt3和opt4，标题分别为“大连”和“哈尔滨”。然后绘制一个命令按钮，其名称为Cmd1，标题为“确定”。再绘制一个标签，其名称为Lab1，宽度为3000，高度为375。
不得修改窗体文件中已经存在的程序。在结束程序运行之前，必须至少进行上面的一种操作。退出程序时必须通过单击窗体右上角的“关闭”按钮。最后按原文件名并在原文件夹中保存修改文件。
第6题：
有一个工程文件ylc6.vbp。请在窗体上画一个文本框，其名称为Text1；画一个命令按钮，名称为Command1，标题为“确定”。再画5个单选按钮，名称分别为option1、Option2、 Option3、Option4和Option5，标题分别为“飞机”、“火车”、“汽车”、“自行车”和“步行”，如图26所示。
编写适当事件过程。选中一个单选按钮，并单击“确定”按钮，按照表3-1在文本框中显示相应的内容。
提供Command1对象的Click事件源代码如下，请补充完整。
Private Sub Command1_Click()
If ? Then
Text1.Text="需要1小时"
End If
If ? Then
Text1. Text="需要10小时"
End If
If ? Then
Text1. Text="需要20小时"
End If
If ? Then
Text1. Text="需要100小时"
End If
If ? Then
Text1.Text ="需要500小时"
End If
End Sub
注意：不得修改已经给出的程序。在结束程序运行之前，必须选择进行上面的一种操作．退出程序时必须通过单击窗体右上角的关闭按钮．存盘时必须存放在考生丈件夹下，工程文件名为ylc6.vbp，窗体文件名为ylc6.frm．
1．操作步骤 (1)在Visual Basic集成环境选择“文件”→“打开工程”命令，在对话框中选择ylc6.vbp工程文件，单击“确定”按钮打开。 (2)在工具箱中选择TextBox控件，在窗体中创建命名为Text1。在属性窗口分别设置属性为空。 (3)从工具箱中选择选项控件，在窗体中拖动创建，在属性窗口分别命名为Option1、 Option2、Option3、Option4和Option5，标题分别为“飞机”、“火车”、“汽车”、“自行车”和“步行”。 (4)通过工具箱创建命令按钮，命名为Command1，标题为“确定”。 2．行为编码 补充后Command1对象的Click事件的完整代码如下： Private Sub Command1_Click() If Option1.Value Then Text1.Text="需要1小时" End If If Option2. Value Then Text1.Text="需要10小时" End If If Option3.Value Then Text1.Text="需要20小时" End If If Option4.Value Then Text1.Text="需要100小时" End If If Option5.Value Then Text1.Text="需要500小时" End If End Sub 3．存盘保存 执行“文件”→“保存工程”命令，工程文件名为yle6.vbp，窗体文件名为ylc6.frm。 解析：(1)这是一道简单的应用题，主要考查OptionButton控件的应用能力。在编程中使用判定的控制流程，显示出不同的结果信息。(2)上面的控制流程使用3个If，．．Then．．．End If，分别判断3个单选按钮是否被选中。判断后在文本框中显示相应的信息。
第7题：
创建名称为Form1的窗体，在该窗体上创建两个单选按钮，名称和标题一致，分别为 Option1和Option2，编写一个事件过程，使得选择Option1时，Option2变灰。程序运行结果如图9所示。程序中不得使用任何变量。
注意：存盘时必须存放在考生文件夹下，工程文件名为ylcl.vbp，窗体文件名为ylcl.frm。
(1)Visual Basic集成环境中，执行“文件”→“新建工程”命令，选择“标准Exe”。创建窗体Form1。 (2)在工具箱中选择标签控件，在窗体中要求位置画出两个标签，其Caption属性分别为Option1和Option2。双击Option1弹出代码编写窗口，添加如下代码： Private Sub Option1_Click() Option2.Enabled=False End Sub (3)按F5键运行程序。如图9所示。 (4)执行“文件”→“保存工程”命令，将工程文件命名为ylcl.bp；窗体文件命名为ylcl.frm。 [*] 解析：(1)第1小题中要使用Enable屑性来控制选择控件的变灰与否。
第8题：
（ 20 ）设窗体上有名称为 Option1 的单选按钮，且程序中有语句：
If Options.Value=True Then
下面语句中与该语句不等价的是
A ） If Option.Value Then
B ） If Option1=True Then
C ） If Value=True Then
D ） If Option1 Then
第9题：
在窗体上画两个单选按钮(名称分别为Option1、Option2，标题分别为“宋体”和“黑体”)、1个复选框(名称为Check1，标题为“粗体”)和1个文本框(名称为Text1，Text属性为“改变文字字体”)，窗体外观如下图所示。程序运行后，要求“宋体”单选钮和“粗体”复选框被选中，则下列能够实现上述操作的语句序列是（ ）。
A.Option1．Valve=False Checkl．Vaim=True
B.Option1．Value=True Check1．Value=0
C.Olption2．Value=False Check1．Value=2
D.Option1．Value=True Check1．Value=1
D。【解析】容器(如窗体和框架)中的单选钮(OptionButton)组常用于提供多个选项间的唯一选择，其Value属性用于设置或返回每个单选钮的选中状态：值为False表示未选，值为True表示选中。复选框(CheckBox)组常用于提供多个选项间的多重选择，Value属性值决定每个复选框的选中状态：0-Un-checked为未选，1-Checked为选中，2-Grayed为禁用(以灰色呈现)。
第10题：
在窗体上画两个单选按钮，名称分别为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
解析：OptionButton(单选按钮)的Value属性应设置为True或False，而CheckBox(复选框)的Value属性应设置为0、1或2(对应控件常数为vbUnchecked、vbChecked或vbGraycd)。