>PictureBox2.Image = lv.Items(n + 1)
?
nって数字ですか?
Image.FromFileで使っているところ見ると文字列にしか見えないのですが。
さらに
> Dim n As String
> n = lv.SelectedItems(0).Text
>PictureBox1.Image = Image.FromFile(n)
というようにTextプロパティから文字列とってImage.FromFileを呼ばないと。
つまり
Dim n As Integer
With Me.ListView1
n = .SelectedItems(0).Index
PictureBox1.Image = Image.FromFile(.Items(n).Text)
PictureBox2.Image = Image.FromFile(.Items(n + 1).Text)
End With
ってことだと。
|