图片浏览
- 格式：doc
- 大小：218.00 KB
- 文档页数：3
VB课程设计任务书 – 图片浏览 第1页共3页
河北工业大学计算机软件技术基础（VB）
课 程 设 计 任 务 书
本题难度级别：B 实现基本要求代码: 约100行 主要涉及: 基本控件及算法
一、设计题目：简单图片浏览器( 出题人：陈冀川 )
二、目的与要求
1.目的
培养学生综合利用VB语言进行程序设计的能力，主要是利用VB的标准控件进行设计。
2.基本要求
设计一个简单的图片浏览器，通过DriveListBox 、DirListBox 和FileListBox 一组控
件选择图片文件，在PictureBox中显示。
详细要求如下：
能够打开常见类型的图片，自动进行缩放，适应PictureBox的大小。
在FileListBox中只列出图片文件。
使用HscrollBar控件对图片进行缩放。
使用StatusBar 控件状态条显示图片文件相关信息，包括图片尺寸(单位：象素)、文
件大小和日期等。
可以轮流显示FileListBox中列出图片文件。
3.创新要求
在基本要求达到后，进行创新设计，创新方向提示如下：
★ 增加菜单，可以提供菜单控制。
★ 可以根据图片的长宽比改变PictrueBox的长宽比。
★ 可以改变窗口大小，窗口上的图片也要做相应的调整。
★ 当图片放大超过窗口大小后，可以提供鼠标移动图片显示。
★ 其它创新(有一定难度，实现代码在30行以上)。
VB课程设计任务书 – 图片浏览 第2页共3页
三、设计方法和基本原理
1.问题描述
程序界面可以参考上面的图。通过单击DriveListBox 、DirListBox 和FileListBox 一
组控件选择图片文件，在PictureBox中显示。通过水平滚动条对图片进行缩放，在状态条显
示图片文件的部分属性。
2.问题的解决方案
①设计程序界面
参考上图。
②编写代码
包括事件处理过程和功能函数，还有必要的声明。
事件处理包括下面的主要事件：
Form_Load()
作一些初始化的工作。
Sub DriveX_Change()
改变DirX。
Sub DirX_Change()
改变FileX。
FileX_Click()
显示图片。
Sub HScrX_Change()
处理图片缩放。
PictureX _ MouseMove(Button As Integer, Shift As Integer, X As Single, Y As
Single)
处理图片随鼠标移动。
四、主要技术问题的描述
本题中的难点在于图片的缩放、移动和图片信息的提取。需要同学熟练掌握PictureBox
的属性、方法、事件和有关文件的一些函数。
1.图片的缩放
图片的缩放使用PictureBox的PaintPicture方法，
Pic1.PaintPicture Pic1.Picture, 0, 0, J, I, 0, 0, L, K
其中I＝当前PictureBox的ScaleHeight；
J＝当前PictureBox的ScaleWidth；
K＝图片实际的ScaleHeight；
VB课程设计任务书 – 图片浏览 第3页共3页
L＝图片实际的ScaleWidth；
在使用时还要注意ScaleMode的设置。
2. 图片的移动
图片在PictureBox中的移动，也使用PictureBox的PaintPicture方法，通过修改
picture
内剪贴区的坐标（x-轴和y-轴）实现。
3. 图片信息提取
图片的尺寸可以使用PictureBox的ScaleHeight、ScaleWidth属性得到。更多的图片信
息可以通过第三方控件获取。
五、参考资料
★ Visual Basic 程序设计教程 及 Visual Basic 实验教程
★ VB6.0程序员指南
★ VB6.0控件参考手册
★ MSDN中文版，课程设计网站上提供的其它资料。
六、设计部分的评分标准（本题难度为B级，综合时要乘系数0.9）
完成基本要求前4项(项目符号为“■”部分)
60
基本要求全部完成
80
创新要求完成任意两项
90
创新要求完成4项或以上
100
[注：最后得分是根据本部分得分(占最大比例)以及课程设计期间纪律、设计报告书、答辩情况综合得出]
