请高手帮我解决一个

hidesuns 2004-02-24 01:56:46
对不起借用一下地盘,我不知道怎么发帖子,我是新手,非常感谢!
我想问一个问题
vb中的FORM2.0组键中的ComboBox控件应该定义成什么类型啊!一般的我定义为combobox类型就行了,可是我要把数据库里面的两个字段都放到combobox中,而且只显示一个字段,只有
form2.0才行,我定义了一个函数
Function AddToCombo(QueryString As String, cmb As ComboBox, _
FieldName As String)
Dim rstemp As ADODB.Recordset
Set rstemp = CreateObject("ADODB.RecordSet")
rstemp.Open QueryString, "DSN=BOOKS"
Do While rstemp.EOF = False
cmb.AddItem rstemp.Fields(FieldName)
rstemp.MoveNext
Loop
rstemp.Close
Set rstemp = Nothing
End Function
希望各位高手多多指教,非常感谢!在线等!明天要交!!!
...全文
15 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复

还没有回复,快来抢沙发~

相关推荐
发帖
VB基础类
创建于2007-09-28

7492

社区成员

VB 基础类
申请成为版主
帖子事件
创建了帖子
2004-02-24 01:56
社区公告
暂无公告