把image1,image2,image3设成数组
image1 的name 为image
image2 的name 为image
image3 的name 为image
:
:它们的index 分别边为 1 、2 、3 ...for i = 1 to 3
image(i).Picture = "" '指定路径..
next i
image1 的name 为image
image2 的name 为image
image3 的name 为image
:
:它们的index 分别边为 1 、2 、3 ...for i = 1 to 3
image(i).Picture = "" '指定路径..
next i
me.controls("image"+cstr(i)).picture=load.......
next
2。使用Callbyname函数。