Office中国论坛/Access中国论坛

标题: 在ADP中窗体数据来源怎么引用列表框的值？ [打印本页]

作者: alphalau81 时间: 2011-4-6 16:08
标题: 在ADP中窗体数据来源怎么引用列表框的值？
在ADP中窗体数据来源怎么引用列表框的值？
我设置了两个存储过程(存储过程经过测试没有问题),现在rs和rst中没有记录不知哪儿出了问题.
代码如下:
Private Sub Form_Load()
Dim rst As New ADODB.Recordset
Dim rs As New ADODB.Recordset
Set rst = CurrentProject.Connection.Execute("exec GPSAdmin.SO_DCCXN '" & Me.List0 & "'")
Set rs = CurrentProject.Connection.Execute("exec GPSAdmin.SO_DCCX'" & Me.List0 & "'")
Set Me.Form.Recordset = rst
Me.Requery
Set Me.Dictionary_Sub.Form.Recordset = rs
Me.Dictionary_Sub.Form.Requery
DoCmd.Restore
Me.Requery
End Sub

作者: zhuyiwen 时间: 2011-4-9 13:20
这段程序应该不会报错，但不合理。

第一，定义rst/rs时不需要New
第二，不要Me.Requery行

另外，Form_Load 时列表框不一定有值。

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