首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。程序功能如下: 1)单击“读数据”按钮,从文件中读出数据,放入二维数组a中。 2)单击“生成新数组”按钮时,依据a数组生成b数组;若a数组元素为素数,则直接将a数组元素的值赋给b数组中相同下标的
在考生文件夹下有一个工程文件sjt5.vbp。程序功能如下: 1)单击“读数据”按钮,从文件中读出数据,放入二维数组a中。 2)单击“生成新数组”按钮时,依据a数组生成b数组;若a数组元素为素数,则直接将a数组元素的值赋给b数组中相同下标的
admin
2020-02-27
75
问题
在考生文件夹下有一个工程文件sjt5.vbp。程序功能如下:
1)单击“读数据”按钮,从文件中读出数据,放入二维数组a中。
2)单击“生成新数组”按钮时,依据a数组生成b数组;若a数组元素为素数,则直接将a数组元素的值赋给b数组中相同下标的数组元素;若a数组元素的值能被2整除,则将该元素值的平方作为b数组同下标的元素;若a数组元素为其他值,则将该元素乘2的值作为b数组同下标的元素。
3)单击“查找最大值”按钮,则在b数组中找最大值并显示在Label2标签上。
在给出的窗体文件中已经有了全部控件,标准模块中有判断素数的函数IsPrime。要求去掉程序中的注释符,把程序中的?改为正确的内容,并编写相应的程序,实现程序的功能。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,各命令按钮的事件过程必须至少各执行一次。
选项
答案
步骤1:打开考生文件夹中的工程文件sjr5.vbp,在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。在“由考生编写”处补充正确代码。参考代码: Open App.Path & "\in5.txt"For Input As #1 Input #1,a(i,j) Private Sub Command2_Click() ’======以下由考生编写============ For i=1 To 5 For j=1 To 5 If sushu(a(i,j))=True Then b(i,j) =a(i,j) Else If a(i,j)Nod 2=0 Then b(i,j)=a(i,j)*a(i,j) ElSe b(i,j)=a(i,j)*2 Erld If End If Next.i,j ’==========考生编写程序结束=========== End Sub Private Sub Command3_Click() ’======以下由考生编写============ Dim k As Long k=0 For i=1 To 5 For j=1 To 5 f b(i,j)>k Then k=b(i,j) Next.i,j Label2.Caption=k ’=========考生编写程序结束============== Open App.Path & "\out5.txt" For Output.As #1 Print #1,Label2.Caption Close #1 End Sub 步骤2:按
运行程序,单击各按钮测试验证。 步骤3:按要求将文件保存至考生文件夹中。
解析
题目要求从文件中读取数据放到数组a当中,给数组a赋值通过嵌套的For循环来实现。“生成新数组”按钮的事件处理过程,按照规则来得到数组b,需要通过嵌套循环实现数组元素逐个赋值。同样,在查找最大值的时候通过嵌套的循环逐个搜索数组b的各个元素,就可以得到最大值。
转载请注明原文地址:https://kaotiyun.com/show/1TTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下选项中,不合法的VisualBasic的变量名是()。
在考生文件夹下有一个工程文件sjt5.vbp,在其窗体中有一个实心圆。程序运行时,当用鼠标左键单击窗体任何空白位置时,实心圆则向单击位置直线移动;若用鼠标右键单击窗体,则实心圆停止移动。窗体文件中已经给出了全部控件,但程序不完整。要求:请去掉程序
设计窗体时,双击窗体上没有控件的地方,打开的窗口是( )。
要建立一个随机文件记录学生的信息,如下定义的学生记录类型,由学号、姓名和5门课程成绩(百分制)组成,下列的定义正确的是()。
如果要定义一个窗体级变量,定义变量语句的位置应该是
下面不能在信息框中输出“VisualBasic”的是()。
表达式Int(-15.8)+Fix(-15.8)+Int(15.8)+Fix(15.8)的运算结果是()。
已知:x=-6y=39则表达式"y\x*Sgn(x)"的值为( )。
把数学表达式表示为正确的VB表达式应该是()。
随机试题
在PHOTOSHOP中执行菜单命令/后,可对当前选择区或图像画布进行前景色,_____________,自定义颜色,_____________等内容的填充.
线型感烟火灾探测器外壳外观保养要求是产品标识应清晰、明显和表面应清洁无腐蚀、涂覆层脱落和起泡现象。()
非血管性介入治疗包括_________、_________、_________、_________和立体定位及γ刀治疗。
症见头痛而眩,心烦易怒,夜眠不宁,面红口苦,苔薄黄,脉弦有力。应诊为:
下列有关控制大气污染的论述中。错误的是:[2005年第16题]
《旅游投诉处理办法》属于()。
根据我国《宪法》的规定,下列有关公民基本权利的宪法保护的表述,哪一个是正确的?()
下面四个所给的选项中,哪一项是由左边给定的图形折成的?()
1.减少温室气体的排放是减缓全球变暖的有效方法之一。2.把每篇英语课文背下来并不一定意味着能主动使用英语。3.必须考虑到国与国习俗不同的这个事实。4.给我印象最深的是中国已发生的巨大变化。5.我一直在琢磨这个句子是否有更好的译法。
设X1,X2,…,Xn是来自总体X的简单随机样本,且总体X的密度函数为(Ⅰ)求θ的矩估计量;(Ⅱ)求θ的极大似然估计量.
最新回复
(
0
)