分享一段函数,返回DATATABLE对象的,
它的意义就是在于,设置好一个SQL连接对象后,根据查询语句,返回一个DATATABLE对象
- Public Function GetDataTable(ByVal sql As String, ByVal sqlcon As SqlConnection) As DataTable
- '实例一个DataTable对象
- Dim dt As New DataTable
- Try
- '实例一个SqlDataAdapter对象,并指定其SqlCommand对象
- Dim SqlAda As New SqlDataAdapter