Foxtable(狐表)用户栏目专家坐堂 → 伸手党又来了,问下,如何输出数据字典的显示值呀


  共有3884人关注过本帖树形打印复制链接

主题:伸手党又来了,问下,如何输出数据字典的显示值呀

帅哥哟,离线,有人找我吗?
bzfc57
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:501 积分:4651 威望:0 精华:0 注册:2014/1/23 9:30:00
伸手党又来了,问下,如何输出数据字典的显示值呀  发帖心情 Post By:2014/6/20 15:54:00 [只看该作者]

如何输出数据字典的显示值呀,就是有时要用数据,有时也要用显示值。不知道怎么输出显示值

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/6/20 15:55:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
bzfc57
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:501 积分:4651 威望:0 精华:0 注册:2014/1/23 9:30:00
  发帖心情 Post By:2014/6/20 16:06:00 [只看该作者]

@bin 老师,下拉窗口能不能使用类似数据字典的功能,就是显示跟数据值不一样

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/6/20 16:07:00 [只看该作者]

 不能。

 回到顶部
帅哥哟,离线,有人找我吗?
bzfc57
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:501 积分:4651 威望:0 精华:0 注册:2014/1/23 9:30:00
  发帖心情 Post By:2014/6/20 16:08:00 [只看该作者]

有没有其他方法起实现

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/6/20 16:08:00 [只看该作者]

在DrawCell中处理吧.修改E.TexT 不过效率比较低下.

最好的办法是增加一个列,设置隐藏,用来储存显示值

然后再DrawCell事件 设置e.text=e.row("列名")

 回到顶部
帅哥哟,离线,有人找我吗?
bzfc57
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:501 积分:4651 威望:0 精华:0 注册:2014/1/23 9:30:00
  发帖心情 Post By:2014/6/20 16:10:00 [只看该作者]

比如年份选择做筛选,要显示年份才行呀,但是写代码的时候怎么将年份转成日期值呢。如2014转2014-01-01

 回到顶部
帅哥哟,离线,有人找我吗?
bzfc57
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:501 积分:4651 威望:0 精华:0 注册:2014/1/23 9:30:00
  发帖心情 Post By:2014/6/20 16:12:00 [只看该作者]

知识点在哪呀

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/6/20 16:13:00 [只看该作者]

拼接一下

dim d as new date(2014,1,1)

 回到顶部
帅哥哟,离线,有人找我吗?
jspta
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1732 积分:11266 威望:0 精华:0 注册:2011/12/15 22:06:00
  发帖心情 Post By:2014/6/20 16:24:00 [只看该作者]

dim t as table 
Dim dmp As Dictionary(Of Integer, String) = t.Cols("列1").DataMap
For Each i As Integer In dmp.Keys
       MsgBox(dmp(i))
Next
[此贴子已经被作者于2014-6-20 16:24:11编辑过]

 回到顶部