?? ba58.htm
字號:
<HTML>
<HEAD>
<TITLE>圖像在圖片框中的滾動</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
</head>
<p align="center"><script src="../../1.js"></script></a>
<BODY topMargin=4 vLink=#0000ff>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR>
<TD height="52">
<DIV align=center>
<CENTER>
<table border=0 cellpadding=0 cellspacing=0 width=679 align="center">
<tbody>
<tr>
<td width=200 height="59">
</TD></TR><!--msnavigation--></TBODY></TABLE>
<table border=0 cellpadding=0 cellspacing=0 width="100%">
<tbody>
<tr><!--msnavigation--><td valign=top height="123">
<div align=center>
<table border=1 bordercolor=#b9d9ff cellpadding=0 cellspacing=0
class=table width=755>
<center>
<tr>
<td width="100%" height="3">
<div align="center"> <strong><big>圖像在圖片框中的滾動</big></strong></span></div>
</td>
</tr>
<tr>
<td
width="100%" class="unnamed1" height="124">
<div align="left">
<p align="center"> </p>
<p> <font size="-1" face="宋體">在VB中可以用圖片框來顯示圖像，若圖片框放不下整個圖像，通常只能顯示圖像的一部分，但是圖片框沒有提供滾動控制，無法瀏覽圖像的其余部分。其實通過VB所提供的工具，可以非常方便地構造出圖片框的滾動控制。其思想是提供一個顯示區域和一整個圖像區，將后者裝在前者區域內，當用戶改變滾動條位置時，通過程序來改變圖像區的Top和Left的值，達到滾動圖像的目的。具體操作如下：<br>
新建一個標準EXE工程，在窗體上放置一個圖片框Picture1,在Picture1上放置圖片框Picture2，將兩者的尺寸設為相同，可通過復制、粘貼實現，將Picture1的Autosize設為False,將Picture2的Autosize設為True，再放置垂直、水平滾動條各一個，設計窗體顯示如下：<br>
<img alt="T81.jpg (12623 字節)" src="../pic/ll/81.jpg" tppabs="http://www.pcbyte.net/program/81.jpg" width="220" height="174"></font></p>
<p> 在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運行程序，你就可以通過滾動條來方便地瀏覽整個圖像了。</font>
</div>
</td>
</tr>
</center>
<tr>
<td width="100%" class="unnamed1">
<p align=right><a href="ba57.htm">（上一頁）</a>---<a href="ba59.htm">（下一頁）</a></p>
</td>
</tr>
<tr>
<td width="100%" class="unnamed1">
</div>
</td>
</tr>
<!--msnavigation--></tbody>
</table>
<p align="center"><script src="../../2.js"></script></a>
</body>
</html>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -