mehr_83
شنبه 25 مرداد 1393, 17:42 عصر
با سلام
بااستفاده از قطعه کد زیر تعدادی فایل را انتخاب و در لیست قرار میدم.
Private pic As New List(Of Image)()
If OpenFileDialog1.ShowDialog() = DialogResult.OK Then
For Each pic_image As String In OpenFileDialog1.FileNames
Dim img As New Bitmap(pic_image)
pic.Add(img)
Next
Label1.Text = pic.Count.ToString()
PictureBox1.Image = pic(a)
End If
چطوری میشه بصورت دستی تعریف کرد و نیازی به Openfile نباشه.
یعنی مسیر فولدری که در داخل برنامه قرار داره رو بصورت دستی بدم و در لیست قرار بگیره
بااستفاده از قطعه کد زیر تعدادی فایل را انتخاب و در لیست قرار میدم.
Private pic As New List(Of Image)()
If OpenFileDialog1.ShowDialog() = DialogResult.OK Then
For Each pic_image As String In OpenFileDialog1.FileNames
Dim img As New Bitmap(pic_image)
pic.Add(img)
Next
Label1.Text = pic.Count.ToString()
PictureBox1.Image = pic(a)
End If
چطوری میشه بصورت دستی تعریف کرد و نیازی به Openfile نباشه.
یعنی مسیر فولدری که در داخل برنامه قرار داره رو بصورت دستی بدم و در لیست قرار بگیره