DBcb1是datacombo控件dim rs1 as new adodb.recordset
....
..
set DBcb1.Set DBcb1.DataSource = rs1
set DBcb1.RowSource = rs1 '结果报错“实时错误91 对象变量或with块变量未设置”
DBcb1.DataField = "name"
DBcb1.ListField = "name"
DBcb1.BoundColumn = "id"
....
..
set DBcb1.Set DBcb1.DataSource = rs1
set DBcb1.RowSource = rs1 '结果报错“实时错误91 对象变量或with块变量未设置”
DBcb1.DataField = "name"
DBcb1.ListField = "name"
DBcb1.BoundColumn = "id"
解决方案 »
- 文件保护,我有一文件,运行后不能被别人复制,如何处理?
- VB的X++。。。
- 谁用过这个VB的DES算法例子?
- 我想问下大家一个关于安装打包时的一个问题?
- 请教关于MSHFLEXGRID和EXCEL的二个问题!谢谢!
- 关于ComboBox!!!急!
- 在数组里找到最大值的函数是什么?
- 在VB中如何扫描系统文件?
- 复选框的打对号用的方框怎么能显示为灰色(用来表示此复选框包含内容部分被选中),
- 教高手我執行一個存儲過程.將SQL服務器上約10万條記錄導入我的mdb數据中.老是出1現"time out expire ODBC SQL drive. 如何做"
- 请问如何在excel中每个sheet插入一个文本框和一个按钮,点击后激活文本框中输入的sheet号的sheet?
- 急聘!!
Rs.Open Sql, CnnDB, adOpenKeyset, adLockReadOnly, adCmdText
If Rs.EOF And Rs.BOF Then
Else
Do Until Rs.EOF
combo1.AddItem Rs("EmpNo")
Rs.MoveNext
Loop
End If
Rs.Close
set rs=nothing