vb如何輪流展示圖片

⑴ 用VB製作顯示圖片循環~看代碼,如何設置循環

'其他的不用修改
Private Sub timer1_timer()
Picture1.Picture = LoadPicture(a(j))
j = j + 1
If j > 29 Then j = j - 30
End Sub

⑵ VB如何實現三張圖片輪流出現，我想做成動態效果

在VB下通過加一個時鍾控制項，然後編寫相應的程序代碼，使得不同的圖片在不同的時鍾周期顯示、其餘的隱藏即可實現你所要的效果。

⑶ vb6.0 運行時如何使幾幅圖片循環出現

設置全局變數 I

然後
i=I+1
if i = 1 then

圖片1
elseif i = 2 then

圖片2
end if

⑷ vb 設置3副圖片輪流播放的程序

PicNo = PicNo + 1
if PicNo = 4 then PicNo = 1

⑸ 圖片輪流播放，點擊圖片能鏈接到新頁面，用VB編寫的

稍等，給你做一個。

⑹ vb編程中如何實現讓兩張圖片交替顯示

加兩個picture控制項picture1和picture2，分別加入2張圖片
用timer來實現兩張圖片交替顯示:
Private
Sub
OnTimer()
if
Picture1.Visible
=
False
then
Picture1.Visible
=
True
Picture2.Visible
=
False
else
Picture2.Visible
=
True
Picture1.Visible
=
False
end
if
End
Sub

⑺ 用VB製作 循環顯示圖片

一、設計界面
啟動Visual Basic ,建立一個標准EXE工程，然後參考下面的界面效果設計軟體的運行界面：

1、使用控制項面板上的【框架】Frame和【標簽】Label控制項建立①的軟體標題，並且將Frame的[Caption]屬性清空，Label的[Caption]屬性修改為「簡易圖片瀏覽器」，[Font]屬性中的字體和大小也作相應的修改；

2、利用控制項面板上的【驅動器列表】DriveListBox控制項建立②的磁碟列表；
3、用控制項面板上的【目錄列表】DirListBox控制項建立③的文件目錄列表；
4、用控制項面板上的【文件列表】FileListBox控制項建立④的文件列表；
5、用控制項面板上的【圖像】Image控制項建立⑤的圖像展示區，設置Image1對象的[Height]屬性為4800，設置[with]屬性值為6400；
6、調整好各個控制項的位置，使到界面的布局合理美觀。

--------------------------------------------------------------------------------
二、代碼實現
Private Sub Dir1_Change()
File1.Path = Dir1.Path
End Sub

Private Sub Drive1_Change()
Dir1.Path = Drive1.Drive '將磁碟的位置告訴目錄列表
End Sub

Private Sub File1_Click()
'將圖片用Loabpicture函數裝載到Image1裡面顯示出來
Image1.Picture = LoadPicture(File1.Path + "\" + File1.FileName)
End Sub

Private Sub Form_Load()
File1.Pattern = "*.jpg;*.bmp;*.Gif"
End Sub

Private Sub Image1_DblClick()
If Image1.Stretch = False Then
Image1.Stretch = True
Image1.Width = 6400
Image1.Height = 4800
Else
Image1.Stretch = False
End If
End Sub
三、軟體說明
在VB裡面編程要管理外部文件一般可以使用以上的方法來實現，也就是混合的使用到【驅動器列表】DriveListBox、【目錄列表】DirListBox以及【文件列表】FileListBox這三個控制項對象，然後再在他們的代碼中實現關聯；
對於【文件列表】FileListBox中顯示的內容，默認情況下是所有的文件類型，如果我們希望它只顯示我們需要的文件類型，也可以通過修改屬性中的[Pattern]圖片格式來實現，例如我們只希望文件列表中看到的是*.jpg、*.bmp、*.Gif這幾類文件我們可以如下圖這樣設置：【注意：有多種不同類型的文件就要用「；」分隔開來】

當然也可以在代碼中進行初始化的時候實現：

⑻ vb如何實現幾個圖象框的輪換顯示在另一圖片框中

給你個代碼
要在TIMER1的屬性里將Interval的值設為：1000（表示一秒鍾顯示一次）

Dim flag As Integer『全局變數

Private Sub Form_Load()
flag = Int(Val(Timer1.Interval / 1000))』在表單的LOAD事件里取值
End Sub

Private Sub Timer1_Timer()『在這里調用就可以了
If (flag - 3) = 0 Then
flag = 0
Else

If flag = 0 Then
Image4.Picture = Image1.Picture
ElseIf flag = 1 Then
Image4.Picture = Image2.Picture
ElseIf flag = 2 Then
Image4.Picture = Image3.Picture
End If
flag = flag + 1
End If

End Sub

⑼ 在vb.net 中，picturebox輪流顯示幾個圖片的問題

首先定義一個全局變數，然後在載入圖片時，根據圖片順序，給這個變數賦值。
Dim n as integer
.....

picture1.image=My.Resources.02

n=2

⑽ 如何在VB輪流顯示圖片

這是考試題嗎？用3 個IMG圖象框吧