Re: [VB6 ] 怎麼使picturebox換圖

看板Visual_Basic作者colawei (就是可樂)時間18年前 (2007/04/19 20:27)推噓1(1推 0噓 0→)

留言1則, 1人參與討論串2/2 (看更多)

這樣寫應該比較好 Private Sub Picture1_Click() Static add As Integer Dim pic As Variant pic = Array("white.jpg", "blue.jpg", "black.jpg") Picture1.Picture = LoadPicture(App.Path & "\pic\" & pic(add)) add = (add + 1) Mod 3 End Sub -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 219.81.206.178

推

fumizuki

04/22 15:18, , 1^F

04/22 15:18, 1^F

‣ 返回看板[ Visual_Basic ] 程設

‣ 更多 colawei 的文章

文章代碼(AID): #169s15Va (Visual_Basic)