listbox我想组合显示，但是table里面的数据是datmap - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → listbox我想组合显示，但是table里面的数据是datmap

共有3788人关注过本帖树形打印复制链接主题：listbox我想组合显示，但是table里面的数据是datmap

a937775799

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

加好友

发短信

等级：二尾狐帖子：594 积分：4030 威望：0 精华：0 注册：2015/3/10 13:25:00

listbox我想组合显示，但是table里面的数据是datmap 发帖心情

Post By：2020/2/13 1:35:00 [显示全部帖子]

我看帮助对listbox事件设置

首先初始化

Dim lb As WinForm.ListBox = e.Form.Controls("lb")

lb.DisplayMember = "employeeState" '设置显示列

lb.ValueMember = "employeeState" '设置取值列

lb.DataSource = "employeeLog" '列表项目来自于客户表

lb.DataFilter = "employeeSFId = '" & dr("employeeSFId") & "' and agreementCode = '" & dr("agreementCode") & "'"

然后事件

e.Value = e.ListItem( "employeeState" ) & "|" & e.ListItem( "employeeStateTime" )

但是有个问题

我employeeLog表里面employeeState列是这样设置的

mdm.ValueCol = 0

mdm.DisplayCol = 1

Tables( e.Form.TableName ).Cols("employeeState").DataMap = mdm.CreateDataMap()

这样我listbox里面显示还是之前的mdm.ValueCol的数据，而我要显示mdm.DisplayCol的数据

a937775799

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

加好友

发短信

等级：二尾狐帖子：594 积分：4030 威望：0 精华：0 注册：2015/3/10 13:25:00

Post By：2020/2/13 10:29:00 [显示全部帖子]

打开窗口后初始化

'''设置工作流代码[flowCode] = 'pro_p'

drs = DataTables("flow").Select("flowCode = 'pro_p' ", "flowPx" )

Tables( e.Form.TableName ).Cols("employeeState").DataMap = Functions.Execute("下拉列表取值显示完善",drs, "flowPx","flowMain" )

-------------------------------------------------------------------

下拉列表取值显示完善函数

Dim drs As List(of DataRow ) = args(0)

Dim mdm As New MultiDataMap

For Each dr As DataRow In drs

mdm.add( dr(args(1)) & "|" & dr(args(2)) )

mdm.ValueCol = 0

mdm.DisplayCol = 1

Return mdm.CreateDataMap()

可以怎么改改吗

a937775799

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

加好友

发短信

等级：二尾狐帖子：594 积分：4030 威望：0 精华：0 注册：2015/3/10 13:25:00

Post By：2020/2/13 11:07:00 [显示全部帖子]

Dim drs As List(of DataRow ) = args(0)

Dim mdm As New DataMap

For Each dr As DataRow In drs

mdm.add( "" & dr(args(1)) , dr(args(2)) )

Return mdm

这样就可以了，但是我发现个问题找了半天 mdm.add( dr(args(1)) , dr(args(2)) ) ，如果dr(args(1)) 是数字就不能正常显示，

所以我改成了 mdm.add("" & dr(args(1)) , dr(args(2)) )

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

主题：listbox我想组合显示，但是table里面的数据是datmap