- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 移动行的问题？求助 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=52967)
-- 发布时间：2014/6/26 14:46:00
-- 移动行的问题？求助
移动行的问题？求助
怎样通过二个控件把表中选择的行向上移动或向下移动呢?求助？？
[此贴子已经被作者于2014-6-26 14:47:18编辑过]
-- 发布时间：2014/6/26 14:48:00
--
如图
此主题相关图片如下：qq截图20140626144252.jpg
-- 发布时间：2014/6/26 14:50:00
--
下移
If CurrentTable.current.Index=CurrentTable.Rows.count-1 Then
CurrentTable.current.Move(0)
Else
CurrentTable.current.Move(CurrentTable.current.Index+1)
End If
上移
If CurrentTable.current.Index=0 Then
CurrentTable.current.Move(CurrentTable.Rows.count-1)
Else
CurrentTable.current.Move(CurrentTable.current.Index-1)
End If
-- 发布时间：2014/6/26 15:01:00
--
不明白什么意思，是说选中多行上移下移？
-- 发布时间：2014/6/26 15:22:00
-- 就差最后一步了，求助？列显视
这个代码我是懂的， Tables("订单").SetColVisibleWidth("日期|90|产品|120|客户|120|数量|60")
现以设计好了框架就差最后一步了，如图，我想将“罗列生肖”表中的数值写到这个代码里，然后将代码写到“确认”控件里就可以实现列显视了，但代码不会写，求老师指点？
此主题相关图片如下：qq截图20140626150934.jpg
-- 发布时间：2014/6/26 15:27:00
--
dim vs as string
for each dr as datarow in datatables("X").select("显示=TRUE") vs = vs & dr("列名") & "|" & dr("显示宽度") & "|"
next
Tables("订单").SetColVisibleWidth(vs.trim("|"))
-- 发布时间：2014/6/26 15:32:00
--
跪谢 bin 老师，搞定了