[求助]关于通过代码设置单列数据字典遇到的问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]关于通过代码设置单列数据字典遇到的问题

共有1552人关注过本帖树形打印复制链接主题：[求助]关于通过代码设置单列数据字典遇到的问题

DrSun

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：65 积分：575 威望：0 精华：0 注册：2017/3/1 11:24:00

[求助]关于通过代码设置单列数据字典遇到的问题 发帖心情

Post By：2017/8/24 17:07:00 [只看该作者]

我根据开发指南里的示例代码，尝试通过代码设置单列的数据字典，发现没有效果（设置完以后，该列显示的内容没有发生变化），请问各位老师，这是什么原因，是我的设置方式存在什么问题吗？

示例代码：

Dim dmp As New DataMap

dmp.Add(1,"苹果")

dmp.Add(2,"香蕉")

dmp.Add(3,"波罗")

dmp.Add(4,"桔子")

dmp.Add(5,"桃子")

Tables("表A").Cols("第一列").DataMap = dmp

此主题相关图片如下：98.png

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2017/8/24 17:22:00 [只看该作者]

第一列是字符类型，所以要这样写

Dim dmp As New DataMap
dmp.Add("1","苹果")
dmp.Add("2","香蕉")

Tables("表A").Cols("第一列").DataMap = dmp

DrSun

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：65 积分：575 威望：0 精华：0 注册：2017/3/1 11:24:00

Post By：2017/8/24 17:49:00 [只看该作者]

我把第一列改为短整数类型，执行代码后看不到效果，是数据类型还是数据精度的问题呢？

代码：

Dim dmp As New DataMap

dmp.Add(1,"苹果")

dmp.Add(2,"香蕉")

dmp.Add(3,"波罗")

dmp.Add(4,"桔子")

dmp.Add(5,"桃子")

Tables("表A").Cols("第一列").DataMap = dmp

DrSun

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：65 积分：575 威望：0 精华：0 注册：2017/3/1 11:24:00

追问

Post By：2017/8/24 18:01:00 [只看该作者]

请问假如数据列是短整数类型的话，是否不能通过代码设置该列的数据字典呢？

解决方法是否只能是把数据列的类型从短整数类型改为整数类型呢？

有点甜

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2017/8/24 18:33:00 [只看该作者]

只要类型匹配，就行

Dim dmp As New DataMap
dmp.Add(CShort(1),"苹果")
dmp.Add(CShort(2),"香蕉")
Tables("表A").Cols("第三列").DataMap = dmp

DrSun

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：65 积分：575 威望：0 精华：0 注册：2017/3/1 11:24:00

Post By：2017/8/24 19:28:00 [只看该作者]

使用您的方法，问题解决了，谢谢

下一主题 >> << 上一主题

主题：[求助]关于通过代码设置单列数据字典遇到的问题