'数据操作执行
Public Sub getConn(ByVal SqlStr As String, ByVal TableName As String) Try objCommand.CommandText = SqlStr objDataSet.Clear() objDataAdapter.SelectCommand = objCommand objDataAdapter.Fill(objDataSet, TableName) Catch ex As Exception MsgBox(ex.Message) End Try End Sub |
VB.net查询获取数据库数据信息
最新推荐文章于 2022-05-21 10:48:06 发布