VFP数据库
使复选框Check1的右侧显示的文本为“婚否”，则下列语句正确的是（）。A、THISFORM.Check1.Caption="婚否"B、THISFORM.Check1.Value="婚否"C、THISFORM.Check1.Name="婚否"D、THISFORM.Check1.Visible="婚否"
题目
使复选框Check1的右侧显示的文本为“婚否”，则下列语句正确的是（）。
- A、THISFORM.Check1.Caption="婚否"
- B、THISFORM.Check1.Value="婚否"
- C、THISFORM.Check1.Name="婚否"
- D、THISFORM.Check1.Visible="婚否"
相似问题和答案
第1题：
建立一个表单，表单文件名和表单控件名均为myform2，表单标题为“数据浏览及维护”，表单基本功能要求如下：
①用选项按钮组(Optiongroup1)控件选择“职工”表(Option1)或“订单”表(Option2)。
②用复选框(Check1)控件确定显示的表是否需要存盘。单击“确定”(Command1)命令按钮，若“保存记录”复选框被选中，则用SQL语句将选项组指定的表的内容存入表“temp”中，否则用SQL语句显示该表内容。
③单击“关闭”(Command2)命令按钮，关闭并释放表单。
步骤1：单击工具栏的[新建]按钮，打开[新建]对话框。在[文件类型]中选择“表单”，单击[新建文件]，打开表单设计器新建表单。单击[表单控件]窗口中的“选项按钮组”，再单击表单，添加“选项按钮组”控件。用同样的方式添加“复选框”和两个“命令按钮”。 步骤2：单击表单，在[属性]窗口中设置“Name”为“myform2”，“Caption”为“数据浏览及维护”。右击选项按钮组选择“编辑”，单击“option1”，在[属性]窗口中设置“Caption”为“职工”；单击“option2”，在[属性]窗口中设置“Caption”为“订单”。再单击复选框按钮，在[属性]窗口中设置“Caption”为“保存记录”。单击第一个按钮(Command1)，在[属性]窗口中设置“Caption”为“确定”。单击第二个按钮(Command2)，在[属性]窗口中设置“Caption”为“关闭”。 步骤3：右击[确定]按钮，编写命令按钮的Click事件代码。 IF ThisForm.CheCk1.Value=1 IF ThisForm.OptionGroup1.Value=1 SELECT *FROM 职工 INTO TABLE TEMP.DEF ELSE SELECT *FROM 订单 INTO TABLE TEMP.DBF ENDIF ELSE IF ThisForm.OPTIONGROUP1.VALUE=1 SELECT *FROM 职工 ELSE SELECT *FROM 订单 ENDIF ENDIF 右击[关闭]按钮，编写命令按钮的Click事件代码 ThisForm.ReleaSe 步骤4：单击工具栏的[保存]按钮，将其命名为myform2，右击表单选择“执行表单”，运行表单即可。
第2题：
要使文本框Txt1中显示的字符字体为隶书，使用的语句是【 】。
Txt1.FontName="隶书"
第3题：
下列( )语句使复选框Check1无效。
A、 Check1.Value = 1
B、 Check1.Value = 2
C、 Check1.Style. = 1
D、 Check1.Style. = 0
第4题：
在窗体上画一个单选按钮和一个复选框，其名称分别为Option1和Check1，然后编写如下事件过程： Private Sub Option1_Click() Check1.Value = Option1.Value End Sub 程序运行后，如果单击单选按钮，其结果为______。
A．单选按钮与复选框的选中情况一致
B．出错
C．如果选中单选按钮Option1，则复选框Check1也被选中
D．如果不选中单选按钮Option1，则复选框Check1也不被选中
第5题：
下列关于Access控件的说法正确的是( )。
A．标签控件用来在窗体或报表上显示说明性文本，显示字段或表达式的数值
B．文本框主要用来输入字段数据，但不能编辑字段数据
C．复选框、切换按钮和选项按钮不能作为单独的控件来显示表或查询中的“是”或“否”的值
D．选项组是由一个组框及一组复选框、选项按钮或切换铵钮组成
解析：本题考查Access中控件的概念。标签控件主要用来在窗体或报表上显示说明性文本，但标签不显示字段或表达式的数值，它并没有数据来源；文本框不但可以用来输入还可以编辑字段数据，它是一种交互式控件；复选框、切换按钮和选项按钮是作为单独的控件来显示表或查询中的“是”或“否”的值，当选中复选框或选项按钮时，设置为“是”，如果不选则为“否”；对于切换按钮，如果按下切换按钮，其值为“是”，否则其值为“否”；选项组是由一个组框及一组复选框、选项按钮或切换铵钮组成：列表框与组合框控件。考生对这些概念应该理解，尤其是细节问题。答案为D。
第6题：
在窗体上画两个单选按钮(名称分别为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为禁用(以灰色呈现)。
第7题：
在窗体上画两个单选按钮，名称分别为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)。
第8题：
（12）在程序的每个空白处填写一条适当的语句，使程序相应的操作。程序实现的功能是：窗体上有文本框Textl和若干复选框，其中复选框Checkl用于设置文本框Textl显示的文本是否加下划线。Checkl的单击事件过程如下：Private Sub Check() If Then Then.FontUnderline=True ElseIf _____Then Then.FontUnderline=False End If End Sub
【解析】题目要求通过选中复选框Checkl来设置文本框的文本是否加下划线，因此判断条件需要对复选框是否选中进行判断，因此If语句后面应填“Check1.Value=1”语句，Elself后面应填“Check1.Value=0”语句。
第9题：
在窗体上有一个名称为Check1的复选框数组(含4个复选框)，还有一个名称为Text1的文本哐，初始内容为空。程序运行时，单击任何复选框，则把所有选中的复选框后面的文字罗列在文本框中(如图1所示)。下面能实现此功能的事件过程是（ ）。
A) 【解析】本题考查复选框控件数组。复选框的Value属性，决定了当前复选框的状态，当Value为1时表示选中复选框。按照题目中的要求，首先清空文本框，接下来对复选框控件数组中的所有元素的Value属性一一筛查，判断是否选中，把选中的复选框控件的Caption属性值连接到文本框的字符串中。
第10题：
在窗体上有一个名称为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?