新手学DataCombo控件遇到的问题!

2006-02-10 09:06:34 157 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

CentOS7安装向日葵报错‘抱歉出现了问题‘？5步搞定最新版11.0.0.36662 本文针对在CentOS7系统上安装向日葵远程控制软件时遇到的‘抱歉出现了问题’报错，提供了详细的排查与解决方案。文章深入分析了依赖缺失、架构不匹配等核心原因，并给出了通过YUM智能安装、环境检查、防火墙配置等5个关键步骤，手把手指导用户成功安装最新版向日葵11.0.0.36662，确保远程桌面连接顺畅。阅读详情

我在编写一个小小的产品系统.
我想实现的是,在输入一个新的产品的资料时,当选中供应商(DataCombo)时,下拉框中会显示供应商代码和供应商的名称(当然假设在供应商表中已经有N个供应商的信息了.)
希望大家给个提示呀,小弟在此谢过了.在网上查了N久了.还是没有找到个头绪..
我也知道它有一些属性,可是试了N遍,也不能实现.在线等.

...全文

解决office出现 ‘很抱歉，powerpoint 无法读取......文件路径’错误的方法昨天帮一个同事解决一个PPT打不开报错的异常，找了很长时间发现网上没有很好的解决的方案，昨天弄了两个小时，现在和大家分享一下经验吧，帮助大家以后遇到类似的问题可以瞬间秒杀。首先，回归来自百度经验的这边文章， *****************************************************************************... 阅读详情

prominent

数据库(包含打印，安装，报表) 1,217 成员 55,949 内容

+ 关注 + 加入社区

切换为时间正序

prominent 2006-02-10

打赏
举报

分数散给你了..谢了...

prominent 2006-02-10

打赏
举报

真是太谢谢了..回去好好研究下....

faysky2 2006-02-10

打赏
举报

追加显示(上面的写错了):
oRS.Open "select 产品名称 from table1 Union select 产品名称 from table1", oConn, adOpenDynamic, adLockOptimistic
Set DataCombo1.RowSource = oRS
DataCombo1.ListField = "产品名称"

faysky2 2006-02-10

打赏
举报

改一下查询语句就行了:

并排显示:
oRS.Open "select 产品名称 & ' ' & 产品代码 as tmp from table1", oConn, adOpenDynamic, adLockOptimistic
Set DataCombo1.RowSource = oRS
DataCombo1.ListField = "tmp"

追加显示:
oRS.Open "select 产品名称 from table1 Union select 产品名称 from table1", oConn, adOpenDynamic, adLockOptimistic
Set DataCombo1.RowSource = oRS
DataCombo1.ListField = "tmp

prominent 2006-02-10

打赏
举报

想把它们并排显示...麻烦大哥了...呵呵...

faysky2 2006-02-10

打赏
举报

你是想把产品名称和产品代码并排显示??
还是把产品代码追加在产品名称后面?

prominent 2006-02-10

打赏
举报

谢谢楼上的...我还有个小提问?
您的好像只会显示一个字段,如果我想显示多个字段呢?如:下拉框中显示产品名称和产品代码两个字段.

faysky2 2006-02-10

打赏
举报

使用DataCombo1的例子：

'需要引用ADO
Dim oRS As New ADODB.Recordset
Dim oConn As New ADODB.Connection

Private Sub Form_Load()
oConn.CursorLocation = adUseClient
'连接字符串的路径自己改过来
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\test.mdb;Persist Security Info=False"

oRS.Open "select * from table1", oConn, adOpenDynamic, adLockOptimistic

Set DataCombo1.RowSource = oRS
DataCombo1.ListField = "某个列名"
DataCombo1.Text = oRS("某个列名")
End Sub

新手学DataCombo控件遇到的问题!

相关推荐