首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹内(C:\ylc)有一个工程文件ylc.vbp。在窗体上有一个文本框,名字为Text1,以及两个命令按钮,名字分别为Command1和Command2,标题分别为Search和Save。还有一个函数过程Search(a),在程序中可以直接调用该
在考生文件夹内(C:\ylc)有一个工程文件ylc.vbp。在窗体上有一个文本框,名字为Text1,以及两个命令按钮,名字分别为Command1和Command2,标题分别为Search和Save。还有一个函数过程Search(a),在程序中可以直接调用该
admin
2009-03-17
53
问题
在考生文件夹内(C:\ylc)有一个工程文件ylc.vbp。在窗体上有一个文本框,名字为Text1,以及两个命令按钮,名字分别为Command1和Command2,标题分别为Search和Save。还有一个函数过程Search(a),在程序中可以直接调用该函数,其功能为判断整型参数number是否为质数。如果是则返回True,否则返回False。编写一个事件过程,实现以下功能:运行时,在文本框内输入一个正整数。单击Search按钮后,找到小于该正整数的第一个素数,显示在 Text1中;单击“Save”,则把Text1中的计算结果存入考生文件夹下的out.txt文件中。程序运行后如图27所示。要求实现题目给出的功能,并将文件保存在考生文件夹下,工程文件名为 ylc.vbp。
选项
答案
(1)在工具箱中选择命令按钮控件,在窗体上创建两个命令按钮,名称分别为Command1和Command2,标题分别为Search和Save。 (2)双击Search按钮弹出代码窗口,在其中添加如下代码: Private Sub Command1_Click() Dim a As Integer number=Val(Text1. Text) Do While (Search(number)=False) number=number-1 Loop Text1.Text=number End Sub (3)双击“Save”按钮弹出代码窗口,在其中添加如下代码: Private Sub Command2_Click() Call savedata("out.txt", CInt(Text1.Text)) End Sub Sub savedata(filename As String, number As Integer) Open App. Path & "\" filename For Output As #1 Print #1, number Close #1 End Sub (4)按F5键运行程序。如图27所示。 (5)执行“文件”→“保存工程”命令,将工程文件命名为ylc.vbp,窗体文件命名为 ylc.frm。
解析
(1)该题答案第4部分中的代码调用了原始文件中的Search函数过程。当函数判断得到第一个质数时就会跳出Do循环体,并将该质数值赋给文本框的Text属性,显示在文本框中。(2)第5部分中编写了一个用于向文件out.txt写入数据的过程,并在Save按钮的单击事件中调用了这个过程。
转载请注明原文地址:https://kaotiyun.com/show/ek1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序的执行结果是()。publicclassTest{publicstaticvoidmain(Stringargs[]){bytey=4;long
为了使模块尽可能独立,要求()。
下面对形参的说法,正确的是()。
Applet生命周期包括Applet的创建、运行和【】几个状态。
下列叙述中正确的是()。
希望编写好的Java程序代码,应遵守命名规则、【】、为代码分段、适当使用空白行、遵循第32条规则。
如果在Applet中要访问一个HTML文件,可以请示浏览器实现相应HTML文本的显示。通过AppletContext的【】方法,Applet可以通知浏览器在哪个窗口中显示哪个URL中的文件。
如果要区分两个英语单词字符串a和b是否相等(而不计大小写)应该选用的方法是()
下列表达式中正确的是()。
具有3个结点的二叉树有()。
随机试题
甲的一头牛走失,乙牵回关入自家牛棚,准备次日寻找失主。当晚牛棚被台风刮倒,将牛压死。乙将牛肉和牛皮出售,各得款500元和100元。请人屠宰及销售,支出100元。下列哪一种说法是正确的?()
某地区果农普遍将地理标志“兴山”用于该地出产的水果在市场上销售,该地的果农甲因接受客户订货过多,便打算将“兴山”标记及部分订单转让给另一地区的果农乙。根据有关规定,下列说法中正确的是()。
风湿性心瓣膜病左房室瓣狭窄最重要的体征是
以原因不明发热为主要起病症状的霍奇金淋巴瘤的特征是
股票筹资的特点是()。
进度控制的经济措施,是指用经济的手段对设备工程进度控制进行影响和制约,它有以下( )几种。
在企业短期资金来源中最典型,最常见的商业信用形式是()。
下列有关注册会计师利用专家工作的说法中不正确的是()。
A、 B、 C、 D、 D第一组第一个图形中的4个小图形分别逆时针移动1格,第二个图形中的4个小图形分别顺时针移动1格,然后叠加得到第三个图形。第二组按照此规律得到D。
[*]
最新回复
(
0
)