'thu tuc lay du lieu(lop BIL)

Public Function layDL(ByVal sql As String) As DataSet

Dim ds As New DataSet

Try

Return objDAL.layDl(sql)

Catch ex As Exception

Throw New Exception(ex.Message)

End Try

End Function