Foxtable(狐表)用户栏目专家坐堂 → TabControl 页面切换


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

主题:TabControl 页面切换

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


加好友 发短信
等级:九尾狐 帖子:2463 积分:22746 威望:0 精华:0 注册:2011/3/29 17:14:00
TabControl 页面切换  发帖心情 Post By:2018/7/16 14:21:00 [显示全部帖子]

TabControl


SelectedIndexChanged

选择不同页面后执行。



Dim bar As WinForm.TabControl = e.sender
Select Case bar.SelectedPage.ButtonText
    Case "全部"
         MainTable = Tables("表A")
    Case "赢单"
         Tables("终端用户").Filter = "[客户等级] = '赢单客户'"
    Case "输单"
         MainTable = Tables("表C")
Case "公海"
         MainTable = Tables("表C")
End Select

 回到顶部