图片的缩小、还原的设置,效果如图2.3。 创建项目,以“昵...
图片的缩小、还原的设置,效果如图2.3。 创建项目,以“昵称-2-3”为项目名保存。 项目完成后,将整个项目文件夹压缩成:昵称-2-3.rar,以附件形式提交。 界面设计要求: 窗体上放置一个PictureBox1图片框和二个命令按钮。PictureBox1图片框装入你所喜欢的图片,设置SizeMode属性为StretchImage,使得图片随着图片框的大小而变,如图2.3所示。 .图2.3 实验2.3运行界面 要求: ① 单击命令按钮“缩小一半”按钮,图片纵、横均缩小一半。 ② 单击“还原”按钮,图片还原回初始装入时大小。 【提示】为了实现还原,要做三件事: ① 必须在事件过程外声明窗体(模块)级变量: Public Class Form1 Dim h%, w% ‘ 用户输入的变量声明语句 ② 在Form1_Load事件中保存图片框的初始值: w = PictureBox1.Width h = PictureBox1.Height ③ 在Button2_Click事件中还原成初始值: PictureBox1.Width =w PictureBox1.Height = h 思考:若要设置图片放大,如何修改代码?