在考生文件夹下有一个工程文件sjt5．vbp，其功能是： ①单击“读数据”命令按钮，则将考生文件央下in5．dat义件中的100个正整数读入数组a中，同时显示在文本框Text1中。 ②单击“素数”按钮，则将数组a中所有素数(只能被1和自身整

admin2015-10-23 37

问题在考生文件夹下有一个工程文件sjt5．vbp，其功能是：
①单击“读数据”命令按钮，则将考生文件央下in5．dat义件中的100个正整数读入数组a中，同时显示在文本框Text1中。
②单击“素数”按钮，则将数组a中所有素数(只能被1和自身整除的数称为素数)存人数组b中，并将数组b中的元素显示在文本框Text2中。
在给出的窗体文件中已经有了全部控件(如图所示)，但程序不完整。

要求：完善程序使其实现上述功能。
注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须先执行“素数”操作，然后再用窗体右上角的关闭按钮结束程序，否则将没有成绩。最后，程序按原文件名进行存盘。

选项

答案步骤1：打开本题工程文件。步骤2：打开代码编辑窗几，在代码编辑窗亡1指定位置编写以下代码。 For k=1 To 100 flag=True i=2 Do While i<=Int(a(k)／2)And flag’循环判断a(k)是否为素数 If Int(a(k)／i)=a(k)／i Then flag=False’若为素教，则使flag为False Else i=i+1’若不为素数，则i加1 End If Loop If flag=True Then num=num+1’满足条件则num累加 b(num)=a(k)。将满足条件的数存入b数组 End If Next k 步骤3：调试并运行程序，关闭程序后按题目要求存盘。

解析单击“读数据”按钮，将考牛文件夹下in5．dat文件中的100个正整数读入数组a中，同时显示在Text1文本框中；运用Space()函数使数值之间空两个格，并判断是否为素数，如果是素数则flag标记为True，并将这个数存入数组b，通过变量num累加数组b的素数个数。最后通过循环语句将数组h中的元素显示在文本框Text2中。

转载请注明原文地址:https://kaotiyun.com/show/UHLp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

二级VB

NCRE全国计算机二级

在窗体上画一个图片框，再在图片框中画一个命令按钮，位置如图所示，则命令按钮的Top属性值是()。

在VisualBasic集成环境中，要添加一个窗体，可以单击工具栏上的一个按钮，这个按钮是()。

在运行程序时，在程序代码中改变文本框的Text属性值，或在文本框中输入新的内容，相应会触发()事件。

设计软件结构是在软件生命周期的()。

下列特征中不是面向对象方法的主要特征的是()。

下列程序弹出对话框中按钮的个数为______。MsgBox"确认!"，vbAbortRetryignore+vbMsgBoxHelpButton+vbinformation,"提示："

关于VisualBasic"方法"的概念错误的是

各种运算符间的优先顺序从高到低是

下列运算符中，优先级最高的是

在一国国际收支中具有突出重要地位的是()

营养不良性钙化常见于

心源性猝死最早出现的是

下列哪组穴是俞募配穴

InCambodia,thechoiceofaspouseisacomplexonefortheyoungmale.Itmayinvolvenotonlyhisparentsandhisfriends,【C

在C++中，实现封装性需借助于()。

与非理性价格波动风险紧密联系、互为因果的风险有()。