问号部分你想实现什么呀? 我觉得你问号部分不需要任何代码
3楼给了你dataset方式读取数据库
我一会把datareader方式的例子贴给你

[此贴子已经被作者于2007-4-13 10:28:41编辑过]
Dim Strsql As String
Dim Reader As SqlDataReader
Try
Strsql = "Select * from table1"
Reader = SqlHelper.ExecuteReader(My.Settings.CebasConnectionString, CommandType.Text, Strsql)
......
Reader.Close()
Catch ex As Exception
End Try
oledbdatareader的例子我这里没有