SHOW IMAGES BY FOR NEXT Thiết kế form sau: picturebox, button Khi click Show Image qua ảnh lên hộp thoại hình, tiếp tục hết dừng lại khơng hiển thị hộp thoại CODE Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim i As Integer For i = To 10 PictureBox1.Image = System.Drawing.Image.FromFile("H:\images\image (1).jpg") MsgBox("Click để thấy hình tiếp theo") PictureBox1.Image = System.Drawing.Image.FromFile("H:\images\image (2).jpg") MsgBox("Click để thấy hình tiếp theo") PictureBox1.Image = System.Drawing.Image.FromFile("H:\images\image (3).jpg") MsgBox("Click để thấy hình tiếp theo") (4).jpg") PictureBox1.Image = System.Drawing.Image.FromFile("H:\images\image MsgBox("Click để thấy hình tiếp theo") PictureBox1.Image = System.Drawing.Image.FromFile("H:\images\image (5).jpg") (6).jpg") MsgBox("Click để thấy hình tiếp theo") PictureBox1.Image = System.Drawing.Image.FromFile("H:\images\image MsgBox("Click để thấy hình tiếp theo") PictureBox1.Image = System.Drawing.Image.FromFile("H:\images\image (7).jpg") (8).jpg") MsgBox("Click để thấy hình tiếp theo") PictureBox1.Image = System.Drawing.Image.FromFile("H:\images\image MsgBox("Click để thấy hình tiếp theo") PictureBox1.Image = System.Drawing.Image.FromFile("H:\images\image (9).jpg") (10).jpg") MsgBox("Click để thấy hình tiếp theo") PictureBox1.Image = System.Drawing.Image.FromFile("H:\images\image MsgBox("Click kết thúc") Exit For Next End Sub End Class ... thấy hình tiếp theo") PictureBox1.Image = System.Drawing.Image.FromFile("H: images image MsgBox("Click kết thúc") Exit For Next End Sub End Class ... PictureBox1.Image = System.Drawing.Image.FromFile("H: images image MsgBox("Click để thấy hình tiếp theo") PictureBox1.Image = System.Drawing.Image.FromFile("H: images image (7).jpg") (8).jpg") MsgBox("Click... PictureBox1.Image = System.Drawing.Image.FromFile("H: images image MsgBox("Click để thấy hình tiếp theo") PictureBox1.Image = System.Drawing.Image.FromFile("H: images image (9).jpg") (10).jpg") MsgBox("Click