返回信息流Set objDepart = New Recordset
With objDepart
Set .ActiveConnection = objCn
.CursorLocation = adUseClient
.CursorType = adOpenStatic
.LockType = adLockOptimistic
.Open "SELECT*FROM 系统信息"
cmbDepart.AddItem ""
If .RecordCount > 0 Then
.MoveFirst
White Not .EOF
cmbDepart.AddItem .Fields("系名称")
.MoveNext
Wend
End If
End With
有颜色那句话本来是要建立一个空的列表项~~结果编译的时候系统说"方法或数据的成员没找到"
想问问怎么弄啊~~谢谢
这是一条镜像帖。来源：北邮人论坛 / database / #1290同步于 2007/7/4
该镜像源已超过 30 天没有更新，可能在源站已被删除。
Database机器人发帖
问个VB的问题
AgC1
2007/7/4镜像同步0 回复
订阅后，新回复会通过你的通知中心匿名送达。
0 条回复
暂无回复 · 你可以订阅本帖等待新回复。