文档介绍：内蒙古工业大学信息工程学院实验报告课程名称:高级语言程序设计(VB)Ⅰ实验名称:选择、循环、数组和过程综合程序设计实验类型:验证性□综合性√设计性□实验室名称:校计算中心班级:学号:姓名:组别:同组人:成绩:实验日期:2014年5月27日实验报告撰写要求实验前用预****报告纸撰写预****报告,预****报告包括以下内容实验目的实验用仪器设备、器材或软件环境实验原理、方案设计、程序框图、预编程序等实验过程中需要记录的实验数据表格实验过程中,要认真观察,仔细记录完成实验后用实验报告纸撰写实验报告,包括以下内容仪器设备型号及编号实验器材或软件环境实验步骤、程序调试方法实验数据处理及结果分析实验中存在的问题体会及思考题报告撰写时,要求格式规范、书写整齐预****报告成绩:指导教师审核(签名):年月日预****报告一、实验目的掌握综合运用常用控件进行程序设计的方法掌握运用菜单和多模块进行程序设计的方法掌握综合运用三种基本控制结构、数组、过程和文本进行程序设计的方法。通过综合型实验,进一步提高程序设计能力。学会综合运用选择结构、循环结构、数组和过程进行程序设计的方法。二、实验用仪器设备、器材或软件环境windowXP操作系统电脑、、Visualbasic程序设计教程、Visualbasic****题解答与实验指导三、实验原理、方案设计、程序框图、预编程序等1、实验原理:利用随机函数产生n(20≤n≤100)个两位整数,将其中的奇数按由小到大的顺序排列并输出;将其中的偶数按由小到大的顺序排列并输出;从随机数中找出素数。用sub子过程或function函数过程判断是否为素数,偶数、奇数和素数按每行10个数在窗体中输出。2方案设计:①mand结束②程序框图设置③流程图设置开始排序输出排序输出文本框输出产生n个随机两位整数奇数偶数素数排序输出实验报告成绩:指导教师审核(签名):年月日实验报告一、实验目的学会综合运用三种基本控制结构、数组和过程进行程序设计的方法。二、实验内容随机产生n个(20≤n≤100)两位整数,找出其中的奇数、偶数和素数,并将奇数按升序排序,将偶数按降序排序,将素数求和。三、,按每行10个数输出到窗体上。。用Sub过程分别对奇数和偶数进行排序,奇数用选择法排序,偶数用冒泡法排序,然后在调用过程内,将排好序的奇数和偶数按每行10个数分别输出到图片框和标签中。。在调用过程内,将找出的素数(按每行10个数)及求和结果输出到文本框中。。,要求在窗体上添加的各个控件布局合理、大小适中。对象属性的设置要求用表格填写,包括对象名、属性名、属性值和说明(可参照前面章节的实验内容)。,若在输入对话框中输入随机产生的整数个数n为50,单击“产生随机整数”命令按钮,则在窗体上输出50个随机整数;单击“找奇偶数并排序”命令按钮,则分别在图片框和标签中输出排好序的奇数和偶数;单击“找素数并求和”命令按钮,则在文本框和顺序文件中输出素数和素数的和;单击“结束”命令按钮,结束程序的运行。运行结果如图所示。、实验内容、实验要求、界面设计(包括各对象及其属性设置)、源程序代码、运行结果(要求截图)、实验中存在的问题、体会和思考等内容。图片框Picture1标签Label1文本框Text1四、界面设计五、运行结果(要求取截图)①程序代码DimxAsinteger,iAsinteger,aAsinteger()mand1_Click()x=Val(InputBox("请输入x的值","输入整数"))Ifx>=20Andx<=100ThenPrint""&x&"个随机整数"ReDimPreservea(x)Fori=1Toxa(i)=Int(Rnd*90+10)Printa(i);IfiMod10=0ThenPrintNextiElseMsgBox"数字错误。",48,"请重新输入"mand2_Click()Dimb%(),c%(),m%,n%,t%,i%,j%Fori=1ToxIfa(i)Mod2<>0Thenm=m+1ReDimPreserveb(m)b(m)=a(i)Elsen=n+1ReDimPreservec(n)c(n)=a(i)EndIfNextiFori=1Tom-1Forj=i+1TomIfb(i)>b(j)Thent=b(i)b(i)=b(j)b(j)=tEndIfNextj,iPrintPrintPrint"";m&"个奇数"Fori=1TomPi