อยากโชว์ข้อมูลที่ดึงมาจาก การ คิวรี่ให้โชว์ใน gridview เลย โดยที่ไม่ต้องผ่าน dataset อ่ะค่ะ

SELECT dbo.Prescription.PatientName FROM dbo.Prescription  
WHERE   (dbo.Prescription.PrescriptionDate = '2013-07-17')
GROUP BY dbo.Prescription.PatientName 
ORDER BY dbo.Prescription.PatientName ASC 

Public Function ShowSelAll(ByVal SelDate As String) As DataSet
        sql = "SELECT "
        'sql &= "dbo.Prescription.PatientId, "
        sql &= "dbo.Prescription.PatientName "
        sql &= "FROM "
        sql &= "dbo.Prescription "
        sql &= "  WHERE "
        sql &= "  (dbo.Prescription.PrescriptionDate = '2013-08-01')"
        'sql &= "  (dbo.Prescription.PrescriptionDate = '" & SelDate & "')"
        sql &= "GROUP BY "
        sql &= "dbo.Prescription.PatientName "
        sql &= "ORDER BY "
        sql &= "dbo.Prescription.PatientName ASC "
        Using cmd As New SqlCommand(sql)
            Return Fill(cmd)
        End Using
    End Function

Public Function Fill(ByVal cmd As SqlCommand) As DataSet
        Try
            cmd.Connection = New SqlConnection(JSDThon)
            cmd.Connection.Open()
            Using da As New SqlDataAdapter(cmd)
                Dim ds As New DataSet
                If Not ds Is Nothing Then ds.Clear()
                da.Fill(ds)
                Return ds
            End Using
        Catch ex As Exception
            WriteLog(ex.ToString, "ERROR")
            Return Nothing
        Finally
            cmd.Connection.Close()
            cmd.Connection.Dispose()
        End Try
    End Function