第十章节图形的控制跟处理课本新

10.1.1 PictureBox控件
4．图形文件的保存 ❖格式：SavePicture picture, stringexpression ❖ 说明： ❖ picture：图片框对象或其他对象的picture属性 ❖ Stringexpression：文件名
10.1.1 PictureBox控件
❖ End Sub
❖
编写命令按钮Cmd2的Click事件：
❖ Private Sub Cmd2_Click()
10.1.1 PictureBox控件
3．卸载图片和复制图片
❖ （1）卸载图片 ❖ 卸载图片文件也有两种方法：一种是在设计阶段卸载，另一种
是在运行阶段卸载。在设计阶段设置属性窗口中的Picture属性 为None，在运行阶段通过LoadPicture函数卸载图片，格式如下： ❖ 对象名.Picture=LoadPicture() ❖ （2）复制图片 ❖ 复制图片可以利用Picture属性和LoadPicture()函数来完成，如： ❖ Picture1.Picture=LoadPicture("C:\Pic\MyPic1.gif"） ❖ Picture2.Picture=Picture1.Picture
的示例图片Sunset.JPG复制到stu1文件夹下。再启动 VB，在stu1文件夹下新建一个工程文件，其布局与运 行结果如图10-2所示。
图10-2 控件布局图及运行结果图
10.1.1 PictureBox控件
❖ （1）控件选择：两个标签控件：Label1、Label2； 两个图片框控件：Picture1、Picture2；三个命令 按钮：Cmd1、Cmd2、Cmd3
❖ （2）控件属性设置：
控件 标签
名称 Label1
属性 Caption
Caption属性 源图
标签 图片框 图片框 命令按钮 命令按钮 命令按钮
Label2 Picture1 Picture2 Cmd1 Cmd2 Cmd3
Caption Picture Picture Caption Caption Caption
AutoSize属性用于设置是否能自动调整图片框大小，以完整显示 装入的图片。值为True时，自动调整大小，以显示装入的整 个图片；值为False时，保持控件大小，装入的图片超出的部 分被截除。
10.1.1 PictureBox控件
2、加载图片
❖ （1）在设计阶段加载图片文件有两种方法： ❖ 1）通过设置属性窗口中的Picture属性来加载图片，步骤如下：
图10-1 PictureBox控件的图标
10.1.1 PictureBox控件
1、主要属性
Name
标Hale Waihona Puke Baidu唯一的对象，运行时为只读
Height、Width、标识控件在容器上显示的尺寸及位置
Top、Left
基 本 Enabled 属
决定对象运行时是否有效。True：运行时有效；False：运行时 无效
第十章节图形的控制 跟处理课本新
10.1 图形控件
❖VB提供的与绘图有关的标准控件有图片框 （PictureBox）、图像框（Image）、直线 （Line）和形状（Shape）。Image、Line、 Shape控件需要较少的系统资源，且包含 PictureBox中可用的属性、方法和事件子集， 因此他们比PictureBox控件显示速度快些。
性 Visible
决定对象运行时是否可见。True：运行时可见；False：运行时 不可见
Font
设置与字体有关的所有内容。包括FontName、FontSize、 FontBold、FontItalic、FontUnderline等
Picture 特 有
属 性 AutoSize
Picture属性用来返回或设置控件中要显示的图片，可以通过属 性窗口进行设置。如果要在程序运行过程中载入图片，常常 使用 LoadPicture 函数
5．Paint事件 ❖ 在一个对象被移动或放大之后，或在一个覆盖该对象
的窗体被移开之后，该对象部分或全部暴露时，此事 件发生。 ❖ 如果AutoRedraw属性被设置为True，重新绘图会自动 进行，就不需要Paint事件。
10.1.1 PictureBox控件 6．常用方法 ❖ 图片框中常使用Cls方法和Print方法。 ❖ 【例10-1】在C:\新建一个文件夹stu1，将我的文档中
10.1.1 PictureBox控件
2、加载图片 ❖ （2）在运行阶段通过LoadPicture函数加载图片，格
式如下： ❖ 对象名.Picture=LoadPicture("图片文件名") ❖ 例如：加载图片：
Picture1.Picture=LoadPicture("C:\Pic\MyPic1.gif")
❖PictureBox和Image控件可以显示位图、图标、 图元文件中的图形，也可处理GIF和JPEG格式 的图形文件。
10.1.1 PictureBox控件
❖图片框（PictureBox）控件的主要作用是在窗 体的指定位置为用户显示图片，也可作为其它 控件的容器、显示Print方法输出的文本或显示 图形方法输出的图形。实际显示的图片由 Picture属性决定。在工具箱面板中， PictureBox控件的图标如图10-1所示。
复制图片 None None 加载图片 复制图片 清除图片
10.1.1 PictureBox控件
❖ （3）代码编写：
❖ 编写命令按钮Cmd1的Click事件：
❖ Private Sub Cmd1_Click()
❖ Picture1.Picture = LoadPicture(App.Path & "\Sunset.JPG")
▪ 在窗体上建立一个图片框 ▪ 保持图片框为激活的控件，在属性窗口中找到Picture属性，单击该属性
条，其右侧出现“…”按钮 ▪ 单击“…”按钮，屏幕显示“加载图片”对话框，从相应文件夹中找到所
需加载的图片，单击打开，图片即被加载
❖ 2）利用剪贴板加载
▪ 用绘图或图像处理软件完成图形处理，并将图形复制到剪贴板中 ▪ 切换到VB，在窗体上建立图片框，并保持为激活状态 ▪ 使用“粘贴”命令，即完成图片加载