(1)在考生文件夹下有一个工程文件sjl3.vbp,窗体上有一个单选按钮数组,含三个单选按钮;还有一个标题为“显示”的命令按钮(如图1-158所示)。程序的功能是,在运行时,如果选中一个单选按钮并单击“显示”按钮,则在窗体上显示相应的信息,例如若选中“小学

admin2010-09-02  14

问题 (1)在考生文件夹下有一个工程文件sjl3.vbp,窗体上有一个单选按钮数组,含三个单选按钮;还有一个标题为“显示”的命令按钮(如图1-158所示)。程序的功能是,在运行时,如果选中一个单选按钮并单击“显示”按钮,则在窗体上显示相应的信息,例如若选中“小学生”,则在窗体上显示“我是小学生”。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的属性。最后把修改后的文件以原来的文件名存盘。

(2)在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm。窗体上有一个名称为Commandl的命令按钮和一个名称为Timerl的计时器。如图1-159所示,请在窗体上画一个标签(名称为Labell,标题为“请输入一个正整数”),再画一个文本框(名称为Textl,初始内容为空白)。已经给出了相应的事件过程。程序运行后,在文本框中输入一个正整数,此时如果按回车键,则可使文本框中的数字每隔0.3秒减1(倒计数):当减到0时,倒计数停止,清空文本框,并把焦点移到文本框中。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。

选项

答案第1小题 【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjt3.vbp。 步骤2:打开代码编辑窗口,在代码编辑窗口,去掉程序中的注释符们“’”,将问号“?”改为正确的内容。 参考代码: For i=0 To 2 If Opl(i).Value=True Then Print"我是"+Opl(i).Caption End If Next 步骤3:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt4.vbp,如表2-90在窗体中画出控件并设置其相关属性。 步骤2:在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: If Val(Textl.Text)=0 Then Timerl.Enabled=False Textl.SetFocus [*] 步骤3:按要求将文件保存至考生文件夹中。

解析 第1小题
   某容器(如窗体和框架)中的单选按钮(OptionButton)组常用于提供多个选项之间的唯一选择,其Value属性用于设置或返回每个单选按钮的选中状态:值为False时表示未被选中,值为True时表示被选中,其Caption属性来设置或返回单选按钮的标题内容。
   根据题目要求,在本题的程序设计上,需要用循环依次遍历单选按钮数组的每一个元素,如果该元素处于选中状态,则在窗体上输出结果。
  第2小题
    可借助计时器来完成有规律性时间间隔执行的任务。本题计时器工作时,为使文本框中的数每隔0-3秒减1,需将计时器的Interval属性值设置为300毫秒,在命令按钮的单击事件过程中通过语句Timerl.Enabled=True启动计时器,在计时器的Timer事件过程中通过语句Textl.Text=Textl.Text-1实现倒计数。
转载请注明原文地址:https://jikaoti.com/ti/yNg0FFFM
0

最新回复(0)