你好，请问label(i)数组显示rs记录集子程序或函数未定义？是什么意思？

Question

我应该在窗体上如何放label控件？我想要这样的效果，谢谢大家！label1.Caption=显示rs里的第1条记录label2.Caption=显示rs里的第2条记录label3.Caption=显示rs里的第3条记录...........................labelN.Caption=显示rs里的第N条记录Private Sub Command1_Click()‘在这里总是提示子程序或函数未定义，该如何定义？Call openconnsql = "select * from CF_ZY_MX where CF_ZY_id ='20101121123641'"rs.Open sql, conn, 3, 2If rs.EOF ThenMsgBox "没有记录"Elsers.MoveFirstlabel(i).Caption = rs("cf_zy_ypmc") & rs("cf_zy_ypsl") & rs("cf_zy_ypdw")rs.MoveNextrs.CloseEnd IfEnd Sub运行时提示：子程序或函数未定义啊？

Answer 1

你的窗体上有Label控件吗，有的话将Label的名称改为“Label”，并将Index分别设为0、1、2、3..

Answer 2

Call openconn中的子程序openconn在哪里？需要编写该子程序代码。
看你的代码应该是不需要，所以删除掉Call openconn试试。