Foxtable(狐表)用户栏目专家坐堂 → [分享]项目的主表管理


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

主题:[分享]项目的主表管理

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


加好友 发短信
等级:三尾狐 帖子:683 积分:4882 威望:0 精华:0 注册:2014/6/15 16:01:00
[分享]项目的主表管理  发帖心情 Post By:2017/2/15 10:20:00 [只看该作者]

很多项目中主表特别多,狐表现在的主表显示查找起来不方便。

 

lsy提供了一个很好的思路,原贴见:http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=56677&replyID=&skin=1,但是该例子要加在自己的项目中很不方便,于是我做了一个精简的版本,只需要一个窗口。

 

你需要在自己的项目中加入和本项目同样的窗口,并设置为“共有窗口” 即可。然后用一个按钮在需要的时候打开这个窗口。

 

功能如下:

 

1.窗口中主表中显示当前项目中所有的表,

2.通过复选框可以选择在表标签中显示多个表,当鼠标点击其中一个表时,主表切换为当前表。

3.新增表时,点击刷新按钮后窗口中显示新增表。

 

 
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20170215105634.png
图片点击可在新窗口打开查看



以下内容只有回复后才可以浏览


[此贴子已经被作者于2017/2/15 10:57:58编辑过]

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


加好友 发短信
等级:三尾狐 帖子:644 积分:4124 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2017/2/15 10:23:00 [只看该作者]

学习

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


加好友 发短信
等级:三尾狐 帖子:683 积分:4882 威望:0 精华:0 注册:2014/6/15 16:01:00
  发帖心情 Post By:2017/2/15 10:24:00 [只看该作者]

已解决。

[此贴子已经被作者于2017/2/15 10:43:55编辑过]

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2017/2/15 10:49:00 [只看该作者]

If t.TableType = TableTypeEnum.Normal AndAlso t.IsCopy = False Then

 

改成

 

If t.TableType = TableTypeEnum.Normal AndAlso t.IsCopy = False AndAlso clsbox.items.Contains(t.name) = False Then

 

-------------------------或者是-----------------------------

 

把clsbox.items.clear清空


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


加好友 发短信
等级:三尾狐 帖子:683 积分:4882 威望:0 精华:0 注册:2014/6/15 16:01:00
  发帖心情 Post By:2017/2/15 10:53:00 [只看该作者]

谢谢版主,我也搞定了,这么做的:

For Each s As String In lst
  If clstbox.items.contains(s) Then
  Else
    clstbox.Items.Add(s)
  End If
Next

如果当前列表存在相同的表名,就不做任何处理,否则,增加一项。

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


加好友 发短信
等级:九尾狐 帖子:2649 积分:19390 威望:0 精华:1 注册:2008/9/12 9:19:00
  发帖心情 Post By:2017/2/15 11:29:00 [只看该作者]

不错,收藏.

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


加好友 发短信
等级:幼狐 帖子:100 积分:716 威望:0 精华:0 注册:2015/9/11 0:54:00
  发帖心情 Post By:2017/2/15 14:05:00 [只看该作者]

学习学习

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


加好友 发短信
等级:狐精 帖子:3361 积分:24802 威望:0 精华:0 注册:2012/3/26 21:47:00
  发帖心情 Post By:2017/2/15 14:29:00 [只看该作者]

good

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


加好友 发短信
等级:四尾狐 帖子:962 积分:8505 威望:0 精华:0 注册:2012/10/3 13:25:00
  发帖心情 Post By:2017/2/15 14:51:00 [只看该作者]

学习

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


加好友 发短信
等级:一尾狐 帖子:450 积分:4521 威望:0 精华:0 注册:2013/12/17 12:55:00
  发帖心情 Post By:2017/2/15 18:04:00 [只看该作者]

dddddddddddd

 回到顶部
总数 49 1 2 3 4 5 下一页