VB课程设-28测绘C111班贾晓东.doc

《VB课程设-28测绘C111班贾晓东.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、此文档收集于网络，如有侵权，请联系网站删除期末成绩处理设计报告学院土木工程班级测绘C111学号117546姓名贾晓东成绩一、设计思路1.要达到的目的①培养学生综合利用VB语言进行程序设计的能力，主要是通过使用VB的标准控件，加深对控件的多个属性的认识及如何使用属性进行程序设计2.关键问题的解决①设计一个具有两个窗口的期末成绩统计的小程序②其中第一个窗口完成：学生人数和4门课成绩的录入，4门课的名称及学生人数由用户输入。每录入完一个学生成绩后，将各门课成绩写入Excel表格中。打开Excel表格查看写入的数据是否②第二个窗口用来绘

2、制描述各科目平均成绩的柱形图，界面中还应包含坐标系、图表名称、各科成绩的平均分值、课程名称及色块③对窗口1的4个文本框要求：在输入成绩之前，焦点要在第一个文本框中，且文本为可编辑状态；当第一个文本框中输入2位数据后，焦点自动移入下一个文本框中，且文本状态和第一个相同文本框中只允许输入数字0、1、2、3、4、5、6、7、8、9及小数点“.”；文本框中文本的位数最大为2位输入学生成绩时窗口上要提示输入的是第几个学生成绩，并要求输入最后一个学生成绩后“写入数组”控件隐藏④全部学生成绩输入完成后，单击“写入Excel文件”控件，把学生成

3、绩全部放在Excel表格中，要求有字段名内容。⑤单击“打开Excel文件”控件，将打开刚刚生成的Excel表。⑥单击“绘制柱形图”控件，打开第二个窗口，并显示以课程平均分为依据的柱状图。⑦要想结束程序，应单击“退出”按钮。三、部分程序关键源代码及注释PrivateSubCommand2_Click()'★创建EXCEL对象SetXlApp=CreateObject("Excel.Application")'★打开已经存在的EXCEL工件簿文件SetXlBook=XlApp.Workbooks.Open(App.Path&"bo

4、ok.xls")'★设置EXCEL对象可见(或不可见)'XlApp.Visible=True'★设置活动工作表,sheet1表示表名，可以使用字符型变量代替。SetXlSheet=XlBook.Worksheets("Sheet1")XlSheet.Range("A1:IV65536").Clear'★给EXCEL对象中的表的单元格附值?'★保存EXCEL文件XlBook.Save'★另存为'XlBook.SaveAs("文件名")此文档仅供学习与交流此文档收集于网络，如有侵权，请联系网站删除'★关闭工作簿XlBook.Clos

5、e(True)'★结束EXCEL对象'xlExcel.Quit'★释放xlApp对象SetXlApp=NothingMsgBox"写入Excle成功"EndSubPrivateSubCommand3_Click()'★创建EXCEL对象SetXlApp=CreateObject("Excel.Application")'★打开已经存在的EXCEL工件簿文件SetXlBook=XlApp.Workbooks.Open(App.Path&"book.xls")'★设置EXCEL对象可见(或不可见)XlApp.Visible=Tru

6、eEndSub四、设计方案的完善及目前存在的问题1．设计方案要完善的地方①操作有点繁琐2.目前存在的问题①开始时出现错误，但不影响使用五、本次设计的收获及心得体会加强了对VB的理解，让我更加明白VB的实际作用。六、对该题目和VB设计的意见和建议1.对该题目的意见和建议不要单个输入，应该直接输入多个同学的成绩。2．对本次设计的意见和建议难度应该降低点。此文档仅供学习与交流