Question

vb 如何将imagelist里面的某个图片显示到picturebox上面？如果显示到image控件上呢？

如何知道imagelist的图片个数？如何引用这个个数？（在程序运行时实现）

Answer 1

Private Sub Command1_Click()
Static i
If i < ImageList1.ListImages.Count Then
i = i + 1
Print "imagelist1里面共：" & ImageList1.ListImages.Count & "张图片，这是第：" & i & "张。"
Picture1.Picture = ImageList1.ListImages(i).Picture
Command1.Caption = "next"
End If
If i = ImageList1.ListImages.Count Then i = 0
End Sub

'添加一个command1、imagelist1