怎么无法给分组赋值？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 怎么无法给分组赋值？

共有2329人关注过本帖树形打印复制链接主题：怎么无法给分组赋值？

有点蓝

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

等级：超级版主帖子：107730 积分：547983 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/6/19 9:09:00 [显示全部帖子]

没看到哪里有给分组列赋值的代码

有点蓝

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

等级：超级版主帖子：107730 积分：547983 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/6/19 9:41:00 [显示全部帖子]

1楼的项目没看到有这个代码。就是3楼的用法

有点蓝

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

等级：超级版主帖子：107730 积分：547983 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/6/19 9:52:00 [显示全部帖子]

重新上传项目，1楼的项目男子组按钮和3楼的代码很多不一样

有点蓝

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

等级：超级版主帖子：107730 积分：547983 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/6/19 10:16:00 [显示全部帖子]

datacolchanged事件的影响，调换一下赋值的位置，放到棋赛名称、编号，姓名赋值之后，不然这几列会触发datacolchanged事件，从基本信息表取分组覆盖回来。或者取消datacolchanged事件给分组赋值的代码

Do While dts.Count > 0

Dim idx As Integer = rand.Next(0,dts.Count-1)

dr = DataTables("比赛积分").AddNew

dr("桌号") = math.Ceiling((i2) / 2)

dr("日期") = di3

dr("棋赛名称") = di1

dr("第几轮比赛") = di2

dr("编号") = dts(idx)("编号")

dr("姓名") = dts(idx)("姓名")

dr("轮赛次数值转换") = Val(di2)

dr("分组") = Str

dts.RemoveAt(idx)

i2 + = 1

Loop

主题：怎么无法给分组赋值？