จะเอารูปมาโชว์ใน DataGridView ต้องยังงัยครับพึ่งหัดเขียน

 Try
            dlg.InitialDirectory = Application.StartupPath
            dlg.Filter = "JPG|*.jpg|GIF|*.gif|PNG|*.png|BMP|*.bmp"
            dlg.FilterIndex = 1
            dlg.CheckFileExists = True
            dlg.ShowReadOnly = False
                     If dlg.ShowDialog = DialogResult.OK Then 
                fs = New FileStream(dlg.FileName.ToString(), FileMode.Open)
                fsImage = New Byte(CInt(fs.Length)) {}
                fs.Read(fsImage, 0, CInt(fs.Length))
                fs.Close()
                'bm = CType(Image.FromFile(dlg.FileName.ToString()), Bitmap)
                Label10.Text = System.IO.Path.GetFileName(dlg.FileName)
                'picl = dlg.FileName
                bm = CType(Image.FromFile(dlg.FileName.ToString()), Bitmap)
                PictureBox1.Image = bm
               
             


            End If
        Catch ex As Exception

        End Try


Private Sub ShowData()
        Try
            ds = New DataSet
            da = New SqlDataAdapter("SELECT * FROM tbljob", sqlcon)
            da.Fill(ds, "tbljob")
            DataGridView1.DataSource = ds.Tables("tbljob")
            dtpimport.Value = Date.Today
            dtpexport.Value = Date.Today
            Call FormatGrd()
        Catch ex As Exception
            MsgBox("ไม่สามารถโชว์ข้อมูลได้")
        End Try
    End Sub



Private Sub FormatGrd()
        Try
            With DataGridView1

                If .RowCount <> -1 Then

                    .Columns(0).HeaderText = "รหัส Job"
                    .Columns(1).HeaderText = "ประเภทงาน"
                    .Columns(2).HeaderText = "รายละเอียด"
                    .Columns(3).HeaderText = "วันรับ"
                    .Columns(4).HeaderText = "วันที่เสร็จ"
                    .Columns(5).HeaderText = "จำนวน"
                    .Columns(6).HeaderText = "หมายเหตุ"
                    .Columns(7).HeaderText = "รูปงาน"



                    .Columns(0).Width = 150
                    .Columns(1).Width = 150
                    .Columns(2).Width = 150
                    .Columns(3).Width = 150
                    .Columns(4).Width = 150
                    .Columns(5).Width = 150
                    .Columns(6).Width = 200
                    .Columns(7).Width = 200
                End If
            End With

        Catch ex As Exception
            MsgBox("ไม่สามรถโชว์ฟอร์มใน DATA ได้")
        End Try

    End Sub


Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Try
            If textjob.Text.Trim = Nothing Or System.IO.File.Exists(dlg.FileName) = False Then
                MsgBox("ไม่สามารถบันบึกข้อมูลได้")
            ElseIf MessageBox.Show("คุณต้องการบันทึกข้อมูลใช่หรือไม่ ?", "คำยืนยัน", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = Windows.Forms.DialogResult.Yes Then
                ds = New DataSet
                'da = New SqlDataAdapter("INSERT INTO tbljob (Jobno,dateimport,Jobimage) VALUES ('" & Me.textjob.Text.Trim() & "','" & Me.dtpimport.Value.ToString("yyyy-MM-dd") & "','" & Me.PictureBox1.ImageLocation & "')", sqlcon)
                da = New SqlDataAdapter("INSERT INTO tbljob (Jobno,categoryid,description,dateimport,dateexport,Qty,Remak,Jobimage) VALUES ('" & Me.textjob.Text.Trim() & "','" & Me.textcategory.Text.Trim() & "','" & Me.textdesciption.Text.Trim() & "','" & Me.dtpimport.Value.ToString("yyyy-MM-dd") & "','" & Me.dtpexport.Value.ToString("yyyy-MM-dd") & "','" & CInt(Me.textqty.Text.Trim) & "','" & Me.textremak.Text.Trim() & "','" & Me.PictureBox1.ImageLocation & "')", sqlcon)
                da.Fill(ds, "tbljob")

                MsgBox("บันทึกข้อมูลเรียบร้อยแล้ว")
                Call ShowData()
                Call cleardata()

            End If
        Catch ex As Exception
            MsgBox("ไม่สามารถบันทึกข้อมูลได้")
        End Try
    End Sub