运用VB编程实现鼠标平滑移动图像.pdfVIP

年 月 第 期 2009 2 电 脑 学 习 1 运用VB 编程实现鼠标平滑移动图像 林世琼* 摘 要：介绍利用VB 编程，实现鼠标平滑拖动图像的方法。 关键词：VB 编程 鼠标拖动 大图像 中图分类号： TP311．11 文献标识码： B 文章编号：1002－2422 （2009）01－0072－02 Smoothly Moving Image by Mouse Drive in VB Programming Lin Shiqiong Abstract: The paper presents the methods to smoothly moving images by mouse drive in VB programming． Keyword: VB Programming Mouse Drive Big Image 1 算法分析 在X 坐标方向上：△x ＝ x2 － x1 1．1 如何移动 在Y 坐标方向上：△y ＝ y2 － y1 在Picture 控件中显示的图片，实际上是由若干个像素 同样，可认为鼠标是在原图上移动了相同的距离，即： 点构成，这些像素点排列成若干行和若干列，形成一个矩形 在X 坐标方向上移动了△x ，在Y 坐标方向上移动了△y 。 区域，也就是Picture 控件的内部工作区域。如果图片尺寸 设Picture 控件所显示的图形块是原图片左上角的一片区 大于控件的内部工作区域，只能看到图片的一部分，相当于 域，即图 1 中的初始位置（原图片的坐标原点O （0 ，0） 在图片上取了和控件的内部工作区域大小相同的一矩形块 上），在Picture 控件中鼠标移动了一段距离（△x ，△y），在 显示在控件中。如果能按鼠标移动的轨迹，不断地从原图片 原图片中也同样移动了相同的距离到达A 点，那么A 点在 中取出要显示在控件中的那部分矩形块，即可实现鼠标移 原图片中的坐标值即为：（△x ，△y）；如果鼠标再在Picture 动图像的功能，上述分析用图形来表述如图1 所示。 控件中移动一定的距离（△x1 ，△y1），在原图片中也同样 控件显示的 A 移动了相同的距离到达B 点，那么B 点在原图片中的坐标 一部分图形 控件显示的 B 值即为：（△x ＋ △x1 ，△y ＋ △y1），依此类堆。 一部分图形 控件显示的 一部分图形 由此可见，在原图中坐标点的确定是由鼠标在Picture 图片原始尺寸 图片原始尺寸 图片原始尺寸 控件中移动的距离而定的。从每次在Picture 控件中按下鼠 （a）初始位置 （b）鼠标移动到 （c）鼠标移动到 标左键移动的距离，即可得到原图中鼠标移动的轨迹（即 A