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

20 查阅

[问答题] 在考生文件夹中有工程文件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表示复选框被选中。在第二个处填“报考中国经济研究中心”,表示此时显示“报考中国经济研究中心”。

计算机考试