dim a as new sqlcommand
a.commandtext="select a,b,c from xxxxxxxxxxxxxxx"
a...............
a是int
b,c 是 varchar

应该如何接受从数据库中返回的植

Dim sqlCnn As New SqlClient.SqlConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "dbName")
Dim sqlCmd As New SqlClient.SqlCommand("select a,b,c, from table1", sqlCnn)
Dim ds As New DataSet
Dim da As New SqlClient.SqlDataAdapter
da.Fill(ds, "tempTable")
Dim a As Integer
Dim b, c As String
For Each dr As DataRow In ds.Tables("tempTable").Rows
a = dr(0)
b = dr(1)
c = dr(2)
'......
Next

能帮我注释一下吗~我是处学者看不懂~先谢谢了；


我从第5开始就看不懂了........

[此贴子已经被作者于2007-7-17 12:31:41编辑过]

能帮我注释一下吗~我是处学者看不懂~先谢谢了；

我是这样字写的........

dim a as new sqlcommand
a.commandtext="select a,b from table1 where a=xxx" 'a=int b=varchar
a.connction=me.sqlconnction1
me.sqlconnction1.open
dim id as integer '用于接受a的值
dim user as string '用于接受b的值
<请问应该怎么进行,如何将a,b值给id和user>
me.sqlconnction1.close

[此贴子已经被作者于2007-7-17 12:32:48编辑过]

呵呵~~
Dim sqlCnn As New SqlClient.SqlConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "dbName")'连接到SQL数据库
Dim sqlCmd As New SqlClient.SqlCommand("select a,b,c, from table1", sqlCnn)'连接字符串
Dim ds As New DataSet'一个DataSet
Dim da As New SqlClient.SqlDataAdapter'一个SqlDataAdapter
da.Fill(ds, "tempTable")'读数据到ds中的一逐步形成临时表tempTable
Dim a As Integer
Dim b, c As String
'下面枚举临时表tempTable里的全部行
For Each dr As DataRow In ds.Tables("tempTable").Rows
a = dr(0)'第1列的数据
b = dr(1)'第2列的数据
c = dr(2)'第3列的数据
'......你可在在这插入代码处理每一行的数据
Next

不好意思
没写sqlCnn.Open()
汗~~
你自己加上吧

谢谢大虾了

dim a as new sqlcommand
a.commandtext="select a,b from table1 where a=xxx" 'a=int b=varchar
a.connction=me.sqlconnction1
me.sqlconnction1.open
dim id as integer '用于接受a的值
dim user as string '用于接受b的值
<请问应该怎么进行,如何将a,b值给id和user>
me.sqlconnction1.close

如果这样字的话应该怎么办~

da.Fill(ds, "tempTable")'读数据到ds中的一逐步形成临时表tempTable
这个还是没有看懂~~~~~~~~~~~~~~~~~~~~~~