在vb中如何对bmp文件按一定比例进行缩小与放大显示与输出.txt

以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题.对一些VB初学者很用.

在 VB中 Form、 PictureBox和 Printer都 有 PaintPicture方 法 ， 它 就 可 以 满 足 你 的 要 求 。 这 个 方 法 功 能 是 复 制 图 像 ， 其 基 本 语 法 如 下 ： 
     object.PaintPicture picture, x1, y1, width1, height1, x2, y2, width2, height2, opcode 
    这 里 的 picture来 自 Form等 的 Picture属 性 ， 而 x1、 y1是 目 标 区 域 的 左 上 角 坐 标 ， 而 x2、 y2是 源 区 域 的 左 上 角 坐 标 ， width1和 height1是 目 标 区 域 的 宽 度 和 高 度 ， 而 width2和 height2是 源 区 域 的 宽 度 和 高 度 ， 如 果 width1=width2且 height1=height2， 那 么 就 是 等 比 例 复 制 ， 你 只 需 要 选 择 适 当 的 参 数 就 可 以 实 现 缩 小 与 放 大 。 参 数 opcode是 操 作 码 ， 其 含 义 可 以 参 考 Windows API中 关 于 BitBlt和 StretchBlt函 数 的 介 绍 。 下 面 是 一 个 简 单 的 例 子 ： 
    Private Sub Form_Click() 
     Me.PaintPicture Picture1.Picture, 0, 0, 3500, 2000 
    End Sub 
    这 个 方 法 有 一 个 非 常 好 的 特 性 ： 作 为 源 对 象 的 PictureBox可 以 是 不 可 见 的 (Visible属 性 为 False)， 这 在 实 际 中 非 常 方 便 。 
<END>