Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共5 条记录, 每页显示 10 条, 页签: [1]
[浏览完整版]

标题:颜色组设置

1楼
明丰 发表于:2011/6/22 13:06:00

请帮忙设置:

 

1 当点击Button1时,“颜色组定义”表当前行的“颜色组”列和“颜色资料”表当前行的“颜色编号”、“颜色”列合并为一行增加到“颜色组定义_颜色组配置”表中;

2 当点击Button2时,如果“颜色组定义_颜色组配置”表当前行的“颜色编号”、“颜色”列已经被引用到实例中,则不能删除,否则删除当前行;

3 隐藏“颜色资料”表中与“颜色组定义_颜色组配置”表的“颜色编号”、“颜色”列内容相同的行,不相同时恢复显示;

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:颜色组设置.table

2楼
mr725 发表于:2011/6/22 16:26:00

1、 3、

Dim r3 As Row = Tables("颜色组配置表").addnew()
Dim r2 As Row = Tables("颜色资料").current
Dim r1 As Row = Tables("颜色组定义").current
r3("颜色组") = r1("颜色组")
r3("颜色编号") = r2("颜色编号")
r3("颜色名") = r2("颜色") 

 

Tables("颜色资料").focus
Syscmd.Row.HideSelectedRows()

 

2、没明白···

[此贴子已经被作者于2011-6-22 17:32:03编辑过]
3楼
明丰 发表于:2011/6/22 22:11:00

第1个问题已解决

 

第3个问题:是临时隐藏,不是删除


图片点击可在新窗口打开查看此主题相关图片如下:第3个问题效果图.jpg
图片点击可在新窗口打开查看
4楼
mr725 发表于:2011/6/22 23:52:00

Syscmd.Row.HideSelectedRows() 就是隐藏选定的行啊,没有删除行的。

 

要全部显示 Tables("颜色资料").filter = ""

5楼
明丰 发表于:2011/6/23 8:55:00
当“颜色组定义_颜色组配置表”新增行内容重复时则撤消新增,请问如何设置?
共5 条记录, 每页显示 10 条, 页签: [1]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .02734 s, 3 queries.