打开Jpeg文件

Question

请教！，我用什么控件可以同时打开多个Jpeg文件（不知Jpeg文件个数），已知路径。

Answer 1

加入一个File控件，设定file的pattern属性为*.jpg,再加一个image控件，定义为数组型，且index=0,
  dim i as integer
  File1.Pattern = "*.jpg"
  File1.Path = "yourpath"
  For i = 0 To File1.ListCount - 1
  Image1(i).Picture = LoadPicture(File1.List(i))
  If i <> 0 Then
  Load Image1(i)
  Image1(i).Visible = True
  Image1(i).Left = Image1(i - 1).Left + 1000
  Image1(i).Top = Image1(i - 1).Top + 1000
  End If
  Next

Answer 2

已知路径：
已知路径下的几个文件名:尾矿1.jpeg 尾矿2.jpeg(各个jpeg文件之间用空格隔开），如何添加到file1控件里？

Answer 3

image,怎么定义为数组型？有错误，53