2. 计算机
  3. 在考生目录下有一个工程文件sjt5．vbp。运行程序后，单击“读数据”按钮，从data5．dat文件中读出一个数据，并显示在标签Label1中；单击“找素数”按钮，则在大于Label1的数据范围内找出最小的素数，并将其显示在标签Label2中。 在

在考生目录下有一个工程文件sjt5．vbp。运行程序后，单击“读数据”按钮，从data5．dat文件中读出一个数据，并显示在标签Label1中；单击“找素数”按钮，则在大于Label1的数据范围内找出最小的素数，并将其显示在标签Label2中。 在

admin2018-10-29  30
问题 在考生目录下有一个工程文件sjt5．vbp。运行程序后，单击“读数据”按钮，从data5．dat文件中读出一个数据，并显示在标签Label1中；单击“找素数”按钮，则在大于Label1的数据范围内找出最小的素数，并将其显示在标签Label2中。
    在给出的窗体文件中已经有了全部控件，并给出了读写文件和判断素数的程序代码。但程序不完整。
    要求：去掉程序中的注释符，把程序中的“?”改为正确的内容，并编写相应程序段，实现程序功能。
    注意：不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后，各命令按钮的事件过程必须至少各执行一次。
选项
答案【操作步骤】 步骤1：打开考生文件夹中的工程文件sjt5．vbp，在代码编辑窗口中，去掉程序中的注释符“’”，将问号“?”改为正确的内容。参考代码： Labell．Caption＝x Close ＃1 Private Sub Command2 Click( ) ’＝＝＝＝＝＝＝＝＝以下考生编写＝＝＝＝＝＝＝＝＝＝＝＝ Dim n As Integer n＝Label1．Caption＋1 While(P(n)＝False) n＝n＋1 Wend Label2．Caption＝n ’＝＝＝＝考生编写程序结束＝＝＝＝＝＝＝＝＝＝＝＝＝＝ Open App．Path ＆"＼out5．dat"For Output As ＃1 Print ＃1，Label2．Caption Close ＃1 End Sub 步骤2：按＜F5＞键运行程序，单击各个按钮测试验证。 步骤3：按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/Y3Fp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)