vb中用adodc怎么获取SQL数据表的一列数据?

2024-11-20 06:32:54

推荐回答（3个）

回答（1）：

我不用adodc的,直接使用 ADODB.Connection 和 ADODB.Recordset 对象
Dim strSQL As String
strSQL = "select * from table1"
Dim rdUser As ADODB.Recordset
Set rdUser = ExecSQL(strSQL)
If rdUser.RecordCount > 0 Then
MSGrid_Show.Rows = rdUser.RecordCount + 1
Dim I As Long
For I = 1 To rdUser.RecordCount
rdUser("字段")
rdUser.MoveNext
Next I
End If

回答（2）：

Adodc1.RecordSource = "select * from table1 "
改成
Adodc1.RecordSource = "select 表中的一个字段名 from table1 "

回答（3）：

for i=1 to adodc1.Recordset.RecordCount
tmp1=Adodc1.Recordset.Fields("姓名")
next