| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 如果通过代码左移表 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=101039) |
||||
| -- 作者：zunwoun -- 发布时间：2017/5/24 9:00:00 -- 如果通过代码左移表 我想实现点击表，表自动左移一个位置，怎样实现？ |
||||
| -- 作者：有点色 -- 发布时间：2017/5/24 9:06:00 --
|
||||
| -- 作者：zunwoun -- 发布时间：2017/5/24 10:29:00 -- 怎样指定需左移的表呢？ |
||||
| -- 作者：有点色 -- 发布时间：2017/5/24 11:05:00 -- Dim tab = basemainform.controls("mainpages") tab.TabPages.Insert(0,tab.Tabpages("表C")) \'移动到第一个位置 |
||||
| -- 作者：zunwoun -- 发布时间：2017/5/24 14:54:00 -- 我只想左移一个，不是移到第一的位置，可以实现吗？ |
||||
| -- 作者：有点色 -- 发布时间：2017/5/24 15:01:00 -- Dim tab = basemainform.controls("mainpages") Dim page = tab.Tabpages("表C") Dim idx As Integer = 0 For i As Integer = 0 To tab.tabpages.count-1 If tab.tabpages(i).name = page.name Then idx = i Exit For End If Next If idx >= 1 Then tab.TabPages.Insert(idx-1,page) |
||||
| -- 作者：zunwoun -- 发布时间：2017/5/25 9:56:00 -- 我的代码是放在CurrentTableChanged事件中，希望是我选择一个表，该表左移一个位置，但按照上面的代码，我选择一个表，被选择的一个表就左移一位，但选中的表就变成另外一个表，我无法选择我想要的表 |
||||
| -- 作者：有点色 -- 发布时间：2017/5/25 11:47:00 -- 太奇葩的功能，和原先的功能有冲突，无法实现。
请说明你为什么要这样做 |
||||
| -- 作者：zunwoun -- 发布时间：2017/5/26 8:54:00 -- 后台数据表太多，我想根据选择频率确定那个数据表靠前，方便查找 |
||||
| -- 作者：有点蓝 -- 发布时间：2017/5/26 9:03:00 -- 自己做一个窗口进行管理 |