主题：[求助]页面集合的问题！【已上传附件】

页面集合 双击click事件里有：

Forms("绩效考核主界面").Controls("TabControl1").SelectedPage.Visible = False

 

主要用于 双击页签关闭该页的。

 

现在有2个问题 ：

 

第一个：一旦关闭掉最右边的页签 会出现灰色界面  而关闭中间的页签不会出现这情况

此主题相关图片如下：1.jpg

 

再双击灰色区域的话就会出现错误，而双击标签的话不会

此主题相关图片如下：3.jpg

 

请问如何解决这一问题，我想用返回被关闭页面的前一个，但貌似没定位属性！

 

 

第二个：由于我默认点击 导航菜单中的 绩效考核的button1按钮，只会出现绩效导航图，隐藏其他标签

此主题相关图片如下：2.jpg

 

Forms("绩效考核主界面").open
Dim pg As WinForm.TabPage
For i As Integer = 1 To 5
    pg = Forms("绩效考核主界面").Controls("TabControl1").TabPages(i)
    pg.Visible = False
Next

 

但是我用导航图增加页签的时候  由于之前设定的页签顺序固定  导致页签增加的时候 并不是按顺序往右增加  有时候会在几个页签中间增加一个  这种怎么解决（我看了其他软件不存在这样的问题）

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:华泰内控系统-erp.rar

让页签不显示

就行了

双击代码直接：e.Sender.TabPages(e.Sender.SelectedIndex).Visible = False

这样不行吗？

这样也可以哦~  不错

 

不过我那个变灰色的问题 还是没法解决！怎么办啊

呵呵，判断一下，如果双击的是最后一个可见的，隐藏之后，再自动选择第一个可见的。

先尝试一下，不行的话，我做个例子给你

C版给了我这个代码

Dim n As Integer = e.Sender.SelectedIndex
e.Sender.TabPages(e.Sender.SelectedIndex).Visible = False
e.Sender.SelectedIndex = n-1

但是测试起来还是有些小问题

比如：总共四页  中间隐藏了 第三页  然后再隐藏第四页 这时n-1=3 但是第三页已经隐藏了  结果又变灰色。。。

 

还有就是第二个问题   这些页签顺序固定

 

我导航图点击调用功能的时会增加页签 但是页签可能在现有页签的中间增加 而不是逐个往右增加(很多软件是逐个往右增加的)  请问如何解决？

差不多是这样吧。

 

Dim n As Integer = e.Sender.SelectedIndex
e.Sender.TabPages(e.Sender.SelectedIndex).Visible = False
For i As Integer = 0 To e.Sender.TabPages.Count -1
    If e.Sender.TabPages(i).Visible = False Then
        e.Sender.SelectedIndex = i
        Return
    End If
Next

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目193.rar

老大

 

关闭 page4 会跳到  page3   而关闭page3后 却跳到page1了   增加了页面后  同样关闭了最右边2个后   关闭其他的都会自动跳到page1  而不是逐个从右往左。

 

 

还有我这个帖子第二个问题  我帖子里的导航图 一个图片对应上面一个page   总共5个  

 

如果我点击  第一个图片  则出现page1  我点击第三个图片  则在页签右边出现page3   
而此时再点击 第二个图片 page2  则会插在page1  与  page3 之间  而不是按从左到右 在page3右边

 

 

其实我提得这2个问题  简单概括为  点击导航图增加功能时 页签是从左往右 逐个增加

                                                      双击关闭页签时 是从右往左 逐个减少