图像在图片框中的滚动

在VB中可以用图片框来显示图像，若图片框放不下整个图像，通常只能显示图像的一部分，但是图片框没有提供滚动控制，无法浏览图像的其余部分。其实通过VB所提供的工具，可以非常方便地构造出图片框的滚动控制。其思想是提供一个显示区域和一整个图像区，将后者装在前者区域内，当用户改变滚动条位置时，通过程序来改变图像区的Top和Left的值，达到滚动图像的目的。具体操作如下：
新建一个标准EXE工程，在窗体上放置一个图片框Picture1,在Picture1上放置图片框Picture2，将两者的尺寸设为相同，可通过复制、粘贴实现，将Picture1的Autosize设为False,将Picture2的Autosize设为True，再放置垂直、水平滚动条各一个，设计窗体显示如下：

在Picture2中装入要显示的图像，因其Autosize属性为True，所以Picture2的尺寸即为图像的尺寸，Picture2.scalewidth减去Picture1.scalewidth的大小即为Hscroll1的Max值，Picture2.scaleheight减去Picture1.scaleheight的大小即为Vscroll1的Max值，Min值均设为0，在 Vscroll1的Change和Scroll事件中添加如下代码：Picture2.top=－vscroll1.value,在Hscroll1的 Change和Scroll事件中添加如下代码：Picture2.left=－hscroll1.value，将滚动条的Smallchange和 Largechange设为你认为合适的值，按F5运行程序，你就可以通过滚动条来方便地浏览整个图像了。