這種功能的實現(xiàn)首先我會認為需要顯示的圖片是有規(guī)律的，就是說通過當前圖片我能知道要顯示的下一張圖片是什么，這需要你的功能設(shè)計要合理，接著就清楚怎么做了吧這樣的功能實現(xiàn)我認為重要的是怎么設(shè)計的數(shù)據(jù)存儲方式，至于。

var imgs=#391jpg#39，#392png#39，#393gif#39，#394jpg#39，#395png#39 var cur=0 var img=documentgetElementById#39img1#39 function change cur++ ifcur=imgslengthcur=0 img1。

先創(chuàng)建幾個panel啊，放進CardLayout布局器，通過點上一張，下一張，切換顯示的panel就行了，取到布局器的對象，應(yīng)該可以直接訪問的多看API。

程序集 窗口程序集1程序集變量 圖片組， 字節(jié)集， ， quot0quot程序集變量 當前圖片， 整數(shù)型程序集變量 圖片張數(shù)， 整數(shù)型程序集變量 下一張， 整數(shù)型 子程序 __啟動窗口_創(chuàng)建完畢 時鐘1時鐘周期 ＝ 1000當前圖片。

點擊事件相信你已經(jīng)做好了我給你說下思路，你可以試驗下在控件庫里有一個Timer控件，當你點擊“上一張”“下一張”后，在點擊事件里啟動Timer控件，讓Timer的執(zhí)行周期設(shè)置為5妙，在Timer的周期事件里寫你的圖片翻頁。

var i=1function changeobj i++ifi10 i=1當圖片大于10張時，讓i=1 var newSrc=iobjsrc=quotimgquot+newSrc+quotjpgquot 要求圖片是一種格式，簡單的用數(shù)字表示，好理解，因為。

看這么久沒人來最好用ListBox代替數(shù)組存貯圖片地址，代碼我寫好了，能留下郵箱或者其他聯(lián)系方式？先貼部分代碼 Imports SystemIO Public Class Form1 Dim picCount As Integer #39記錄圖片總數(shù) #39#39#39 #39#39#39 單擊選擇圖片。

放一個PictureBox到窗體上，處理PictureBox的Click事件 private void pictureBox1_Clickobject sender， EventArgs e pictureBox1Load@quotC\xin_0jpgquot加載下一張圖片。

MessageBoxShowquot已到最后一張圖片quot 重置 private void button1_Clickobject sender， SystemEventArgs e pictureBox1Image=Picturename1。