我是菜鸟!DataGrid怎么显示不出来

zhouqf 2005-09-26 11:11:02
我按照以前的贴子写的
Public objDataSet As DataSet
Public objDataAdpter As SqlDataAdapter
Public objSqlConnection As SqlConnection = New SqlConnection("workstation id=ZQF;packet size=4096;user id=dba;data source=SL;persist security info=True;initial catalog=fxbbdata;password=sql")

Public Function GetDataFromDB(ByVal sqlstr As String) As DataSet
objDataSet = New DataSet
objDataSet.Clear()


'实例化一个数据集对象
Try
objSqlConnection.Open()
Dim mycom As SqlCommand = New SqlCommand(sqlstr, objSqlConnection)
'打开数据库连接
objDataAdpter = New SqlDataAdapter(mycom)
'将数据库的数据映射到数据适配器
objDataAdpter.Fill(objDataSet)
'填充数据集的数据
objSqlConnection.Close()
DataGrid1.DataSource = Nothing
DataGrid1.DataSource=objDataSet.Tables(0)
'关闭数据连接,这一点很重要
Catch
MsgBox("错误号:" & Err.Number & "错误描述:" & Err.Description)
End Try
Return objDataSet
objDataSet = Nothing
End Function
结果是一片空白,什么都看不到!
...全文
66 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
poplarjvjv1981 2005-09-26
  • 打赏
  • 举报
回复
DataGrid1.DataSource=objDataSet.Tables(0)
DataGrid1.DataBind()
zhouqf 2005-09-26
  • 打赏
  • 举报
回复
谢谢,出来了!
misiacat 2005-09-26
  • 打赏
  • 举报
回复
DataGrid1.DataBing

16,553

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧