image不能改变图片的大小,而picture可以改变图片的大小。  图片可以改变image的大小,而不能改变picture的大小。我的理解对吗?

解决方案 »

  1.   

    PictureBox 控件
                PictureBox 控件可以显示来自位图、图标或者元文件,以及来自增强的元文件、JPEG 或 GIF 文件的图形。如果控件不足以显示整幅图象,则裁剪图象以适应控件的大小。语法PictureBox说明也可以用 PictureBox 控件将 OptionButton 控件分组,并用该控件显示图形方法的输出和 Print 方法写入的文本。为了使 PictureBox 控件能够自动调整大小以显示整幅图形,将它的 AutoSize 属性设置成 True。可在代码中操作图形属性和方法,以创建动画或进行仿真。对运行时的打印操作,例如修改屏幕窗体格式以便打印,Graphics 属性和事件是很有用的。在 DDE 对话中,PictureBox 控件还可以起接收端链接的作用。PictureBox 控件和 Data 控件是唯一可以放置在 MDI 窗体内部区域的标准 Visual Basic 控件。可以使用该控件在内部区域的顶部或底部对控件分组,以创建工具栏或状态栏。注意   Unisys Corporation 有一项专利,该专利声称涉及到 GIF-LZW 压缩技术的某些方面,在该技术中使用了 PictureBox 和 Image 控件。Microsoft Corporation 于1996年9月获得了对 Unisys LZW 专利的使用许可。然而,Microsoft 的许可证并不延伸到那些软件开发商或第三方,他们使用任何 Microsoft 工具包、语言开发或操作系统产品来在他们自己的产品中提供 GIF 读/写和/或任何其他 LZW 能力(例如,通过 DLL 和 API)。如果您的商业应用程序使用了这些控件之一(并且因此使用了 LZW 技术),您可能会希望获得有关专利的独立的法律意见,详细信息请与 http://www.unisys.com/ 的 Unisys USA 联系。Image 控件
                Image 控件用来显示图形。Image 控件可以显示来自位图、图标或元文件的图形,也可以显示增强的元文件、JPEG 或 GIF文件。语法Image说明因为 Image 控件使用较少的系统资源,所以重画起来比 PictureBox 控件要快,但是它只支持 PictureBox 控件的一部分属性、事件和方法。用 Stretch 属性确定是否缩放图形来适应控件大小,反之亦然。虽然可以把 Image 控件放在容器里,但是 Image 控件不能作为容器。注意   Unisys Corporation 有一项专利,该专利声称涉及到 GIF-LZW 压缩技术的某些方面,在该技术中使用了 PictureBox 和 Image 控件。Microsoft Corporation 于1996年9月获得了对 Unisys LZW 专利的使用许可。然而,Microsoft 的许可证并不延伸到那些软件开发商或第三方,他们使用任何 Microsoft 工具包、语言开发或操作系统产品来在他们自己的产品中提供 GIF 读/写和/或任何其他 LZW 能力(例如,通过 DLL 和 API)。如果您的商业应用程序使用了这些控件之一(并且因此使用了 LZW 技术),您可能会希望获得有关专利的独立的法律意见,详细信息请与 http://www.unisys.com/ 的 Unisys USA 联系。
      

  2.   

    //image不能改变图片的大小,而picture可以改变图片的大小。
    后半句对,前半句不对。
    image空间的Strech属性若设为true,就可以拉伸图片而改变图片的大小。//图片可以改变image的大小,而不能改变picture的大小。
    跟前面相反,后一句不对,前一句对。
    当获得图片大小后,是可以让picturebox来适应这个大小的。
    附:获取图片大小的方法:
    Private Sub Command1_Click()
        Dim pic As StdPicture
        Set pic = LoadPicture("e:\mc\m3.jpg")
        Dim w As Long
        Dim h As Long
        w = CLng(ScaleX(pic.Width, vbHimetric, vbPixels))
        h = CLng(ScaleY(pic.Height, vbHimetric, vbPixels))
        MsgBox "图片大小为:" + CStr(w) + "*" + CStr(h) + "像素"
        Set Picture1.Picture = pic
    End Sub