Visual Basic - 圖片框名稱可變增量

有沒有辦法將圖片從一個PictureBox對象設置到另一個？例如：Visual Basic - 圖片框名稱可變增量

pictureboxA1.image = pictureboxB1.image 
pictureboxA2.image = pictureboxB2.image 
pictureboxA3.image = pictureboxB3.image

我與TextBox控件類似的事情，但是這個代碼不工作對我來說：

For i = 0 To 2 
    Me.Controls("picturebox" + "A" & i + 1).image = Me.Controls("picturebox" + "B" & i + 1).image 
Next i

當我運行它，我得到一個錯誤，說明.image is not a member of 'System.Windows.Forms.Control'。

我知道這是pictureboxA1.image = pictureboxB1.image。

但如果我嘗試這樣

For i = 0 To 2 
    Me.Controls("picturebox" + "A" & i + 1).image = Me.Controls("picturebox" + "B" & i + 1).image 
Next i

它說，圖像是不是控件的成員。，因爲我必須這樣做pictureboxA1.image = pictureboxB1.image，21次。

像 pictureboxA1，pictureboxA2，... 3，4，5，6，7，直到21

，如果我不喜歡這樣

pictureboxA1.image = pictureboxB1.image

我必須右邊的代碼21次，如果我只用一次xD來做。

和我tryed .picture它說同樣的事情

來源

2012-11-11 Cenas

您已發佈評論作爲解答。請停止這樣做。我意識到現在的問題是你需要將控件作爲PictureBox進行投射。 –

你又做了:)。我標記了你的「答案」，希望它們很快就會消失。這聽起來像我的答案解決了上述問題。 –

對不起，我應該已經看到了這一點越快。您需要將控件設置爲PictureBox才能識別該屬性。我認爲。像這樣的東西可能會起作用。我無法訪問PictureBox控件，所以這是一個猜測：

Dim pic as PictureBox 

For i = 0 To 2 
    set pic = Me.Controls("picturebox" + "A" & i + 1) 
    pic.image = Me.Controls("picturebox" + "B" & i + 1).image 
Next i

來源

2012-11-11 23:17:51

如果這不起作用，請在此下面發表評論，或編輯您的帖子。 –

非常感謝：D – Cenas

Visual Basic - 圖片框名稱可變增量

回答

相關問題