欢迎来到天天文库
浏览记录
ID:33614365
大小:264.50 KB
页数:3页
时间:2019-02-27
《vb课程设-拼拼看设计报告》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、拼拼看课程设计报告(VB)编号:11拼拼看设计报告学院机械学院班级机设054学号050375姓名季文华成绩一、设计思路1.要达到的目的图1图2①要求用VisualBasic对象的程序设计思想完成程序的设计。②由对话框装入一图形文件到图像控件,将图片分割成9组再装入到图片控件数组各元素,见图1。③单击Start按钮生成要拼的图形。如图2所示(图中隐藏图片的位置是随机产生的)。④单击隐藏图片相邻的图片可以移动图片的位置,重复移动图片最终完成拼图。⑤如果未能完成拼图操作,可以单击标题为show的按钮,恢复图片原状。⑥程序界面美
2、观,能够完成主要的功能。⑦培养学生综合利用VisualBasic语言进行程序设计的能力,主要是培养学生利用系统提供的基本控件进行创新性设计,理解VisualBasic语言中面向对象的程序设计。2.关键问题的解决①把图片装入Image1控件。②保存图片控件数组元素的原始位置数据。③按照给定的分割系数分割图像,将分割得到的图像画入各图片控件数组元素。④随机产生一个图片控件数组元素索引号,将该元素隐藏,将其与其它元素充分交换位置,将图片原有位置打乱。⑤在拼图过程中,每交换一次图片位置,要判断一次拼图是否成功。二、模块之间的调用
3、关系,或程序流程图调用调用调用调用开始模块Inmage控件数组模块时钟模块结果输出模块结果输出模块拼拼看课程设计报告(VB)编号:11三、部分程序关键源代码及注释PrivateSubRenew()Watch.Text="Time00:00"'计时重画ForI=0ToNub'载入PIC数组控件的原始位置数据PIC(I).Left=PL(I)PIC(I).Top=PT(I)NextPICG.Mov=0'不能操作拼图IfNub=15Then'隐藏PIC控件看情况置可见与否与否PIC(PHid).Visible=TrueElse
4、IfPHid<9ThenPIC(PHid).Visible=TrueEndIfEndIfImage1.Stretch=FalseImage1.Visible=FalseImage1.BorderStyle=0'调整Image1的边框样式得到图像的原始大小PICG.ImH=Image1.Height'得到图像的大小尺寸PICG.ImW=Image1.WidthForI=0ToNubPIC(I).Visible=True'置各PIC控件于可见NextEndSub四、设计方案的完善及目前存在的问题1.设计方案要完善的地方①没有
5、使用Inputbox控件②增加多种分割方法2.目前存在的问题①界面还不够漂亮五、本次设计的收获及心得体会拼拼看课程设计报告(VB)编号:11在这次VB设计中学到了很多东西,但还有很多东西要学。对一些问题的解决还不够熟练。着要在以后的学习中慢慢练习。学无止境,不懂的东西还很多。六、对该题目和VB设计的意见和建议1.对该题目的意见和建议增加一些控件的应用,对该题目还是相当又难度的,希望以后再吧题目做的更完善。2.对本次设计的意见和建议本次设计是很成功的,使大家从中受益匪浅,开阔了大家的眼界,使大家对VB的认识更加的深入,这是
6、最有意义的,也是最重要的,希望以后能出更多的题目。
此文档下载收益归作者所有