ขอตัวอย่างการอ่านข้อมูลจาก datagrid แล้วเก็บค่าไว้ในตัวแปรหน่อยครับ

 Dim col1 As String
        Dim col2 As String

        Dim ddateDTPK As String
        Dim dbookdateDTPK As String
        For i = 0 To drugdetailDGV.Rows.Count - 1

            col1 = drugdetailDGV.Rows.Item(i).Cells(1).Value
            col2 = drugdetailDGV.Rows.Item(i).Cells(2).Value

 MsgBox(col1)

        Next

If col1 <> "" Then
                MsgBox(col1)
  End If