Question

C++怎么通过picturebox数组随机显示图片

Answer 1

'首先将9张图片的名称改为1～9为名字的文件（如：1.jpg~9.jpg）。
'控件数组Picture1(0) 到Picture1(8)
Sub a()
Dim b As New Collection
Dim i As Integer
Dim n As Integer
For i = 1 To 9
b.Add i
Next i
For i = 8 To 0 Step -1
n = Rnd * i + 1
Picture1(i).Picture = LoadPicture(b(n) & ".jpg")
b.Remove n
Next i
End Sub

要9张图同时显示的话，要添加控件数组Picture1(0) 到Picture1(8)，共9个PICTUREBOX中。

追问

这不是C++的吧，Dim这个东西是不是VB里的?