[问答题] 在考生文件夹中有工程文件djks01 6.vbp及其窗体文件djks016.frm，该程序是不完整的。请在有的地方填入正确内容，然后删除及所有注释符(’)，但不能修改其他部分。存盘时不得改

[问答题] 在考生文件夹中有工程文件djks01 6.vbp及其窗体文件djks016.frm，该程序是不完整的。请在有的地方填入正确内容，然后删除及所有注释符(’)，但不能修改其他部分。存盘时不得改

[问答题] 在考生文件夹中有工程文件djks01 6.vbp及其窗体文件djks016.frm，该程序是不完整的。请在有的地方填入正确内容，然后删除及所有注释符(’)，但不能修改其他部分。存盘时不得改变文件名和文件夹。

本题描述如下：窗体上有一个名称为Text1的文本框；两个复选框，名称分别为Ch1和Ch2，标题分别为“中国国情研究中心”和“中国经济研究中心”；一个按钮，标题为“报考”。要求程序运行后，如果只选中Ch1，单击按钮，则在文本框中显示“报考中国国情研究中心”；如果只选中Ch2，然后单击按钮，则在文本框中显示“报考中同经济研究中心”；如果同时选中Ch1和Ch2，单击窗体，则在文本框中显示“报考冲突”；如果Ch1和Ch2都不选取，在单击窗体后，则在文本框中什么都不显示。窗体显示如下图所示。

[试题源程序]

1 Private Sub Commandl Click( )

2 Text1.Text=""

3 If Then

4 Text1. Text="报考冲突"

5 Else If Ch2. Value=1 Then

6 Text1. Text=

7 Else If Ch1. Value=1 Then

8 Text1. Text="报考中国国情研究中心"

9 End If

10 End Sub

正确答案：

第一步：启动Visual Basic，打开考生文件夹下的工程文件sit3. vbp。 第二步：双击窗体中的任何位置，进入代码编辑窗口，填写代码如下： 第一个处填Ch1. Value=1 AndCh2. Value=1 第二个处填“报考中国经济研究中心” 第三步：填写完毕，调试成功后，以原文件名保存。

参考解析：

根据题意当复选框Ch1与Ch2都被选中时，文本框显示“报考冲突”，故第一个处填Ch1. Value=1 And Ch2. Value=1，表示两者同时被选中。对于复选框，Value值为1表示复选框被选中。在第二个处填“报考中国经济研究中心”，表示此时显示“报考中国经济研究中心”。