-------------------

小梨。

-----------------------------------

htuomrev

没有直接的方法，不过可以用代码自定义。
这里用textbox做例子，你自己改成picturebox就可以了。

1. TextBox[] theTextBoxes = new TextBox[size];
   
2. foreach (TextBox curControl in theTextBoxes)
   
3. {
   
4.    //do stuff
   
5. }

复制代码

小梨。

没有直接的方法，不过可以用代码自定义。
这里用textbox做例子，你自己改成picturebox就可以了。
htuomrev 发表于 2012-4-27 03:48 PM

你好，谢谢你的回复，我现在做到这样子了

1. Dim PictureBoxes() = {PictureBox1, PictureBox2, PictureBox3, PictureBox4, PictureBox5, PictureBox6, PictureBox7, PictureBox8, PictureBox9, PictureBox10}
   
2.         Dim PictureFiles(9) As Image
   
3. 
   
4.         Dim i As Integer = 0
   
5.         For i = 0 To 9
   
6.             PictureFiles(i) = Image.FromFile("D:\mis\photo\*.jpg")
   
7. 
   
8.         Next
   
9. 
   
10. 
    
11.         Dim a As Integer = 0
    
12. 
    
13.         For a = 0 To 9
    
14.             PictureBoxes(a).Image = PictureFiles(a)
    
15.         Next
    
16.     End Sub

复制代码

现在是这句的问题：

1. PictureFiles(i) = Image.FromFile("D:\mis\photo\*.jpg")

复制代码

会跳error  ： Illegal characters in path.


但如果我写

1. PictureFiles(i) = Image.FromFile("D:\mis\photo\1.jpg")

复制代码

就没问题，load出来全部都是1.jpg，可是我想做的是load出来整个folder 的jpg 照片。
any clue><

htuomrev

回复 3# 小梨。


    path 不能出现 '*' 字符 ==''。

1. PictureFiles(i) = Image.FromFile("D:\mis\photo\" & i & ".jpg")

复制代码

用&把i直concat进去即可。

小梨。

回复  小梨。


    path 不能出现 '*' 字符 ==''。用&把i直concat进去即可。
htuomrev 发表于 2012-4-27 06:13 PM

    可是，我其他的jpg都有名字的，比如， blue.jpg, sand.jpg , flower.jpg

htuomrev

回复 5# 小梨。


    *.jpg是window command用来扫描文件用的，vb可不吃这一套。
你现在有三个方法解决：
一是每次再读取jpg的时候都扫描文件夹一次，自动获取文件名。这个方法你可能要自己google一下了，我没弄过。
二是你再多设置一个array，不过是string，把所有jpg的名字都存在array里，然后根据index获取文件。此方法如上，只不过是实现设定好文件名。
三是把你的jpg名字用index方式来命名0.jpg, 1.jpg, 2.jpg ... n.jpg。

你自己看着办吧。

小梨。

回复  小梨。


    *.jpg是window command用来扫描文件用的，vb可不吃这一套。
你现在有三个方法解决 ...
htuomrev 发表于 2012-4-27 06:44 PM

    好的，非常谢谢你。
   不好意思麻烦你了。