vf实验报告五.docxVIP

vf实验报告五 　　华北科技学院计算机系设计性实验　　实验报告　　课程名称程序设计语言VF实验学期XX至XX学年第2学期学生所在系部人文社会科学学院年级XX级专业班级新闻B112学生姓名闫静怡学号XX任课教师杨月江实验成绩　　计算机系制　　实验报告须知　　1、学生上交实验报告时，必须为打印稿。页面空间不够，可以顺延。2、学生应该填写的内容包括：封面相关栏目、实验地点、时间、目的、设备环境、　　内容、结果及分析等。　　3、教师应该填写的内容包括：实验成绩、教师评价等。　　4、教师根据本课程的《综合性实验指导单》中实验内容的要求，评定学生的综合　　性实验成绩；要求在该课程期末考试前将实验报告交给任课教师。综合性实验中，所涉及的程序，文档等在交实验报告前，拷贝给任课教师。任课教师统一刻录成光盘，与该课程的期末考试成绩一同上交到系里存档。5、未尽事宜，请参考该课程的实验大纲和教学大纲。　　《计算机技术基础VF》课程综合性实验报告　　开课实验室：基础一XX年06月14日　　第5章设计下拉式菜单和快捷菜单　　1.实验目的　　熟悉菜单设计器的使用。　　掌握设计下拉式菜单的方法。　　掌握快捷菜单的设计和调用。　　2.实验要求　　设计一个“货物管理系统”下拉式菜单，要求如下：　　①包括“数据录入”、“数据维护”和“数据查询”3个子菜单，如图所示；②能够对货物表作浏览、录入、更新、删除等操作。　　设计一个快捷菜单，要求具有查找及导入导出功能，供在“货物管理系统”菜单中绣服挥清词数据时使用。　　3.实验准备　　阅读主教材节、节、节。　　4.实验步骤　　建立“货物管理系统”菜单：执行命令“MODIFYMENU货物管理系统”→在随即出现的“新建菜单”对话框中选定“菜单”按钮，即出现“菜单设计器”窗口。　　图“货物管理系统”的菜单设计器　　在“菜单名称”列中输入“数据录入(\0?iEndifEndforSettalkonReturn　　?从键盘上接受一个字符串，统计该字符串中包含的数字字符(0~9)的总个数并显示出来。settalkoffclears=0　　accept请输入一个字符串：toan=len(a)fori=1tonj=substr(a,i,1)　　ifasc(j)=48.and.asc(j)=600　　Replace基本工资With基本工资*Case基本工资=400.and..基本工资=?折叠次数为：,nexitendifn=n+1enddosettalkonreturn　　?输入三角形的三个边长Ａ、Ｂ、Ｃ，若Ａ、Ｂ、Ｃ能构成三角形，则计算出三角形　　“构积式中W=(A+B+C)／2　　SETTALKOFFCLEAR　　INPUT请输入三角形的第一边长度：TOAINPUT请输入三角形的第二边长度：TOBINPUT请输入三角形的第三边长度：TOCIFA+BC.AND.B+CA.AND.C+ABW=(A+B+C)/2　　S=SQRT(W*(W-A)*(W-B)*(W-C))　　?输入的三个边长能构成三角形，三角形面积=,S　　IFA**2+B**2=C**2.OR.B**2+C**2=A**2.OR.C**2+A**2=B**2?构成直角三角形.ENDIFELSE　　?输入的三个边长不能构成三角形！ENDIF　　SETTALKONReturn?某班学生计算机考试成绩已登记到自由表的成绩(N)型字段中，　　另有评估(C型)字段。编程序将每个学生计算机的学习评估：“优秀”(90－100)“良好”(80－89)“中等”(70－79)“及格”(60－69)“不及格”(0－59)，写到评估字段中。　　SETTALKOFFCLEARCLOSEALL　　USECOMPUTER　　DOWHILE.NOT.EOF()DOCASE　　CASE成绩60　　REPLACE评估WITH“不及格”CASE成绩70　　REPLACE评估WITH“及格”CASE成绩80　　REPLACE评估WITH“中等”CASE成绩90　　REPLACE评估WITH“良好”OTHERWISE　　REPLACE评估WITH“优秀”ENDCASESKIPENDDOUSE　　SETTALKONRETURN　　?已知数据表N_中只有一个数值型字段Data，且目前数据表中无记录，是编写程序，从键盘上接受20个数据存放到该数据表中，然后利用索引排序的方式找出这20个数据中的最大数和最小数并显示输出。　　SettalkoffClearCloseall　　Dimensiona(20)UseN_listFori=1to20J=str(i,2)　　Input“请输入第j.个数：”toa(i)Appe