Office中国论坛/Access中国论坛

标题: 求助:怎样读取记录的值 [打印本页]

---

作者: huangyz_xy    时间: 2010-11-22 00:08
标题: 求助:怎样读取记录的值
表Table有A/B/C/D四列,怎样依次读取或者隔行读取记录的值?用子窗体的方法可以,但是要在窗体中创建子窗体很麻烦,请大侠赐教!

---

作者: ui    时间: 2010-11-22 09:26
用DAO或ADO循环读取

---

作者: termisss    时间: 2010-11-22 09:46
上班之余,来逛逛论坛.

---

作者: huangyz_xy    时间: 2010-11-22 12:36
Dim rs As Recordset, Y As Double
     Set rs = New ADODB.Recordset
     rs.ActiveConnection = CurrentProject.Connection
     rs.Open "RxLevelSub", , adOpenKeyset, adLockOptimistic
     rs.MoveFirst  
     Do Until rs.EOF = True  
     MsgBox rs!ID
     rs.MoveNext
    提示方法和成员未找到，怎么办阿？
     Loop
     rs.Close

---

作者: zyp    时间: 2010-11-22 12:49


Dim CN As New ADODB.Connection
   Dim RS As New ADODB.Recordset
   Set CN = CurrentProject.Connection
   RS.Open "SELECT * FROM RxLevelSub", CN, adOpenKeyset, adLockReadOnly
   Do Until RS.EOF
        MsgBox RS!ID
        RS.MoveNext
    Loop
    RS.Close
    Set RS = Nothing
    CN.Close
    Set CN = Nothing

---

作者: huangyz_xy    时间: 2010-11-22 12:54
感谢感谢！

---

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)

Powered by Discuz! X3.3