用鼠标拖动picturebox的边框即可。注意属性中autosize 应为true.

解决方案 »

  1.   

    还可以让他可控大小,除了autosize=ture外,可加上image控件,把它的visible属性设成true,然后剪接,粘贴到picture控件里,这样不但可让小图变的合适,还可以自由拖动图片大小
      

  2.   

    用autosize=true只能满足大图的要求,小图要满框显示就不行了。我指的是picturebox有一部分没有图片,看起来很难看。
      

  3.   

    在picturebox的paint事件里重画图形Private Sub Picture1_Paint()
        Dim pp As StdPicture
        Set pp = LoadPicture("c:\pic.bmp")
                
        Picture1.PaintPicture pp, 0, 0, Picture1.Width, Picture1.HeightEnd Sub
      

  4.   

    这样做的好处是,只要Picture1进行了刷新(例如Picture1改变大小,或者窗口切换等),图片都会随它的实际大小改变而自动填满,不会有你说的空白部分。