Question

vb中，用循环怎样向窗体加载多个图片

数量多，不可能每加载一个都用图片loadpicture写一行代码吧，（有个方法就是用循环，但是每个图片不一样，也就是说图片路径不一样，所以循环就行不通了。文件名能否为量），所以请各位帮帮忙。

例如：
Private Sub Form_Load()
for xh=1 to 10
a=".bmp"
b=xh+a
image1(xh).picture=LoadPicture("c:\b")
next xh
sub
("c:\b")这样写行不？

Answer 1

image1(xh).picture=LoadPicture("c:\b")
上面的话改为
image1(xh).picture=LoadPicture("c:\" & b)

因为b是一个变量 放在引号里面就变成字符串了！~

Answer 2

image1(xh).picture=LoadPicture("c:\" & b)