首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个文本框,名称分别为Textl、Text2;还有三个命令按钮,名称分别为Cl、C2、C3,标题分别为”输入”、”计算”、”存盘”(如图2-210所示)。并有一个函数过程isprime(a)可以在程序
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个文本框,名称分别为Textl、Text2;还有三个命令按钮,名称分别为Cl、C2、C3,标题分别为”输入”、”计算”、”存盘”(如图2-210所示)。并有一个函数过程isprime(a)可以在程序
admin
2013-10-18
35
问题
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个文本框,名称分别为Textl、Text2;还有三个命令按钮,名称分别为Cl、C2、C3,标题分别为”输入”、”计算”、”存盘”(如图2-210所示)。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素数,如果是素数,则返回True,否则返回False。请编写适当的事件过程,使得在运行时,单击”输入”按钮,就把文件in5.txt中的整数放入Textl中;单击”计算”按钮,则找出大于Textl中的整数的第一个素数,并显示在Text2中;单击”存盘”按钮,则把Text2中的计算结果存入out5.txt文件中。
注意:考生不得修改isprime函数过程和控件的属性,必须把计算结果通过单击”存盘”按钮存入out5.txt文件中。
选项
答案
步骤1:打开考生文件中的本题工程文件sjt5.vbp,在代码编辑窗口,分别编写命令按钮的单击事件。 参考代码: Private Sub Cl_Click( ) Open”in5.txt”For Input As#1 Input #1,a% Close #1 Textl.Text=a% End Sub Private Sub C2 Click( ) a%=Textl.Text Do a%=a%+1 Loop Until isprime(a%) Text2.Text=a% End Sub Private Sub C3_Click( ) Open”out5.txt”For Output As #1 Print #1,Text2.Text Close #1 End Sub
解析
转载请注明原文地址:https://kaotiyun.com/show/EHQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在数据库管理系统提供的数据定义语言、数据操纵语言和数据控制语言中,【】负责数据的模式定义与数据的物理存取构建。
程序流程图中带有箭头的线段表示的是()。
在窗体上画一个名称为Commandl的命令按钮,再画两个名称分别为Labell、Lubd2的标签,然后编写如下程序代码:PrivateXAsIntegerPrivateSubCommandl_Click()X=5:Y=3Callproc
在考生文件夹下有一个工程文件sj5.vbp,窗体上有两个文本框,名称分别为Textl和Text2,分别用来表示两个计数器;还有两个计时器Timerl和Timer2。Timerl用于变换Textl的计数;Timer2用于控制Text2的计数。运行时,单击“开
以下关于菜单的叙述中,错误的是______。
下列叙述中正确的是______。
在面向对象的程序设计中,类描述的是具有相似性质的一组【】。
目录列表框的Path属性的作用是______。
下述关于数据库系统的叙述中正确的是
下列选项中,不是一个算法的基本特征的是()。
随机试题
硅胶或氧化铝具有不均一的表面,能吸附微量的()或其他极性分子,会使吸附剂活性大大降低。
子宫内膜异位症是指子宫内膜的生长超出___________范围。
A、脑脊液和脑膜B、脑膜和脑实质C、脑膜、脑实质、部分脑室和脑脊液D、脑膜、脑实质、部分脑室,无脑脊液E、脑膜、脑实质、部分脑室、脑脊液和脊膜脑囊状膨出的内容物是_________。
一足月新生儿,静脉血红细胞压积75%.,生后12h发生呼吸暂停,引起呼吸暂停的原因最可能是
盐酸麻黄碱的性质是
孙甲与孙乙乃兄弟,孙甲18岁,孙乙16岁。二人某日到舞厅跳舞,孙甲与张某发生口角并打了起来,孙乙帮其兄孙甲打张某。派出所对孙甲、孙乙每人处以罚款500元的处罚,张某不服,向县公安局申请复议。县公安局改处各拘留5日,孙氏兄弟俩不服。问题:孙乙可否委托其兄
在刑事诉讼中,犯罪嫌疑人自接受侦查机关第一次讯问或被采取强制措施之日起,有权委托辩护人。侦查期间能够担任其辩护人的是()。
某人开始说“你的这个意见很好,我想大家都会同意”。但他接着又说,“你的意见很好,我想没有谁不会不同意的”。可见( )
有三个关系R,S和T如下:则由关系R和S得到关系T的操作是( )。
A.tofindjobsB.todolow-skilljobsC.tofeeditspeopleD.tohandledisputesE.tomakeaprofitF.to
最新回复
(
0
)