首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上画两个单选按钮,名称分别为Optl和Opt2,标题分别为“100~200之间素数”和“200~400之间素数”;一个文本框,名称为Textl;两个命令按钮,其名称分别为Cmdl和Cmd2,标题分别为“计算”和“存盘”,如图22-5
在名称为Form1的窗体上画两个单选按钮,名称分别为Optl和Opt2,标题分别为“100~200之间素数”和“200~400之间素数”;一个文本框,名称为Textl;两个命令按钮,其名称分别为Cmdl和Cmd2,标题分别为“计算”和“存盘”,如图22-5
admin
2010-07-13
63
问题
在名称为Form1的窗体上画两个单选按钮,名称分别为Optl和Opt2,标题分别为“100~200之间素数”和“200~400之间素数”;一个文本框,名称为Textl;两个命令按钮,其名称分别为Cmdl和Cmd2,标题分别为“计算”和“存盘”,如图22-5所示。程序运行后,如果选中一个单选按钮并单击“计算”按钮,则计算出该单选按钮标题所指明的所有素数之和,并在文本框中显示出来。如果单击“存盘”按钮,则把计算结果存入out.txt文件中,该文件必须放在考生文件夹中(在考生文件夹中有标准模块nrode.has,其中的putdata过程可以把结果存人指定的文件,而’isprime函数可以判断整数X是否为素数,如果是素数,则函数返回True,否则返回False,考生可以将该模块文件添加到自己的工程中)。
注意:必须把素数之和存入考生文件夹下的out.txt文件中,否则没有成绩。保存程序时必须存放在考生文件夹下,窗体文件名为sj5.frm,工程文件名为sj5.vbp。
选项
答案
本题主要考查的知识点有文本框及选项按钮的使用,在程序代码设计中用到了循环结构设计的思想。素数的判断准则为看该数除了1和其本身之外,还有无其他约数,若有,表示该数不是素数,否则该数为素数。 文本框用Text属性来显示计算结果;命令按钮的标题通过Caption属性来设置,单击命令按钮触发Click事件;为了检测单选按钮是否被选中,可以通过检测Value属性来实现,当Value的属性为True时,表示单选按钮被选中,否则未被选中。 ①建立界面并设置控件属性。题目提供了程序用到的控件及其属性,见下表。 [*] ②打开工程资源管理器,在其空白处右键添加模块mode.bas(此文件已在考生文件夹里),模块代码如下: Option Explicit Sub putdata(t_FileName As String,T_Str As Variant) Dim sFile As String sFile="\"&t_FileName Open App.Path&sFile For Output As#1 Print#1,T Str Close#1 End Sub Function isprime(t_I As Integer)As Boolean Dim J As Integer isprime=False For J=2 To t_I/2 Ift_I Mod J=0 Then Exit For Next J IfJ>t_I/2 Then isprime=True End Function ③打开工程资源管理器,右击窗体,选择查看代码项,在弹出的代码窗口输入代码如下: Private Sub Cmdl Click() Dim i As Integer Dim temp As Long temp=0 If Opt2.Value Then For i=200 To 400 If isprime(i)Then temp=temp+i End If Next i Else For i=100 To 200 If isprime(i)Then temp=temp+1 End If Next i End If Textl.Text=temp End Sub Private Sub Crod2 Click() putdata"\out.txt",Textl.Text End Sub ④调试并运行程序。 ⑤按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/wGmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假设a是int类型的变量,并初始化为1,则下列选项中合法的条件语句是( )。
数据结构包括数据的逻辑结构、数据的【】以及对数据的操作运算。
下面程序段的输出结果是( )。publicclassTest{publicstaticvoidmain(String[]args){intj=2,i=5;whi
给出下面程序段if(x>0)System.out.println("Hello.");elseif(x>-3)System.out.println("Nicetomeetyou
关于文件名的处理中,测试当前文件是否目录用______函数。
下列基本命令中,属于类文件分解器命令的是
下列组件不能添加进Frame主窗口的是
下列代表八进制整数的是
下面程序中,若从键盘输入大写字母C,则程序的输出结果是______。importjava.io.*;publicclassTest{publicstaticvoidmain(String
Java的图形界面技术经历了两个发展阶段,分别通过提供AWT开发包和【】开发包来体现。
随机试题
简述克服行政绩效制约因素的途径。
诗句“君不见黄河之水天上来,奔流到海不复回"出自诗作()
设,f(u)为可微函数,则()。
设事件A、B互不相容,且P(A)=p,P(B)=q,则等于()。[2012年真题]
如果合同预计总成本超过合同预计总收入,应将预计损失确认为当期的合同费用。()
企业编写校园招聘记录表需要获取应聘者的有关信息。内容包括()。
下列选项中,属于西方古典经济学内容的是()。
党的十七大通过的党章把“和谐”与“富强、民主、文明”一起作为社会主义现代化建设的目标写入了社会主义初级阶段的基本路线,其原因在于社会和谐是()。
以下程序中,while循环的循环次数是()。main(){inti=0;while(i<10){if(i<1)continue;if(i==5)break;
在“学生体检表”中,有“身高”、“体重”、“性别”等项。若需要查找出身高在155以公分以上而体重在40公斤以下的女生,在下列选择查询的条件表达式中正确的是()。
最新回复
(
0
)