巧用利用VB.NET圖片框解決屏幕的滾動
我們常常都會遇到很多的問題,每個問題都有解決的辦法,這個我就給大家解決一個關(guān)于屏幕的滾動的小問題。因為當要顯示的內(nèi)容超出了屏幕的大小后,利用VB所提供的垂直滾動條和水平滾動條等控件是不可能直接實現(xiàn)這一特殊顯示功能的。那么有沒有其它的辦法呢?答案是肯定的。我們知道VB.NET圖片框是用來顯示圖形的,但它還有許多其它用途,比如可以用來創(chuàng)建一些動畫圖形等。其實對于上面的問題我們也可以利用VB.NET圖片框來巧妙地解決。方法如下:
首先,單擊工具框中的VB.NET圖片框(Picture Box)控件和命令按鈕控件,在窗體(Form1)上建立圖片框?qū)ο驪icture1和命令按鈕對象Command1,將命令按鈕的Caption屬性設置為"退出",Picture1的大小設置為顯示區(qū)域的大小,再單擊工具框中的圖片框控件,在Picture1上建立另一個圖片框?qū)ο驪icture2,將它的Left和Top屬性設置為0。
#T#用文本框,標簽框等其它控件或?qū)胍环鶊D象在Picture2上設定具體的顯示內(nèi)容,當然Picture2的大小一定要先調(diào)整到能全部容納所有要顯示的內(nèi)容,最后單擊工具框中的垂直滾動條控件和水平滾動條控件,在窗體(Form1)上分別建立垂直滾動條對象VScroll1和水平滾動條對象HScroll1,并設置好它們的屬性。至此在窗體(Form1)上的所有設置工作就完成了,下面是具體的程序代碼:
- Private Sub VScroll1_Change()
- Picture2.Top= -VScroll1.Value
- End Sub
- Private Sub Hscroll1_Change()
- Picture2.Left= -HScroll1.Value
- End Sub
- Private Sub Command1_Click()
- End
- End Sub
運行程序,當按下橫、豎滾動條時,就能使顯示內(nèi)容實現(xiàn)左右、上下的滾動。此方法簡單易行,有興趣的朋友不妨試一試。