首页 > 计算机 > 计算机考试 正文

[多项选择题] 在考生文件夹内(C:ylc)有一个工程文件ylc.vbp。在窗体上有一个文本框,名字为Text1,以及两个命令按钮,名字分别为Command1和Command2,标题分别为Search

时间:2021-07-20 17:05:47 解答: 85 次

[多项选择题] 在考生文件夹内(C:ylc)有一个工程文件ylc.vbp。在窗体上有一个文本框,名字为Text1,以及两个命令按钮,名字分别为Command1和Command2,标题分别为Search和Save。还有一个函数过程Search(a),在程序中可以直接调用该函数,其功能为判断整型参数number是否为质数。如果是则返回True,否则返回False。编写一个事件过程,实现以下功能:运行时,在文本框内输入一个正整数。单击Search按钮后,找到小于该正整数的第一个素数,显示在 Text1中;单击“Save”,则把Text1中的计算结果存入考生文件夹下的out.txt文件中。程序运行后如图27所示。要求实现题目给出的功能,并将文件保存在考生文件夹下,工程文件名为 ylc.vbp。

正确答案:

在工具箱中选择命令按钮控件,在窗体上创建两个命令按钮,名称分别为CommandA和CommandB,标题分别为Search和Save。 (B)双击Search按钮弹出代码窗口,在其中添加如下代码: Private Sub CommandA_Click() Dim a As Integer number=Val(TextA. Text) Do While (Search(number)=False) number=number-A Loop TextA.Text=nu

参考解析:

(1)该题答案第4部分中的代码调用了原始文件中的Search函数过程。当函数判断得到第一个质数时就会跳出Do循环体,并将该质数值赋给文本框的Text属性,显示在文本框中。 (2)第5部分中编写了一个用于向文件out.txt写入数据的过程,并在Save按钮的单击事件中调用了这个过程。

  • 相关题库

请充值VIP继续使用(未注册用户支付后会自动注册登录)

×

95元 29元

VIP截止日期:2025-01-02 11:52:40

←请使用支付宝扫码支付

95元 29元

VIP截止日期:2025-01-02 11:52:40

←请使用微信扫码支付