Foxtable(狐表)用户栏目专家坐堂 → 请教页面集合相关问题


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

主题:请教页面集合相关问题

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


加好友 发短信
等级:小狐 帖子:349 积分:3329 威望:0 精华:0 注册:2016/3/8 18:13:00
请教页面集合相关问题  发帖心情 Post By:2021/5/12 15:07:00 [只看该作者]

老师好!

   我在窗口中放了一个页面集合tabcontrol控件,想通过SelectedIndexChanged在不同页面控制不同的表,我点击一个页面对应的表添加一行,但是没反应,请指教。

Dim bar As WinForm.NavBar = e.sender
Select Case bar.SelectedPage.ButtonText
    Case "提货单"
         MainTable = Tables("表1")
    Tables("表1").AddNew

End Select

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107035 积分:544406 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/5/12 15:22:00 [只看该作者]

tabcontrol控件?为什么代码里使用的是NavBar ?

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


加好友 发短信
等级:小狐 帖子:349 积分:3329 威望:0 精华:0 注册:2016/3/8 18:13:00
  发帖心情 Post By:2021/5/12 15:35:00 [只看该作者]

老师,不好意思,粘贴的时候搞错了,代码:

Dim bar As WinForm.TabControl = e.Sender
Select Case bar.SelectedPage.Text
    Case "提货单"
         MainTable = Tables("表1")
    Tables("表1").AddNew

End Select

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107035 积分:544406 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/5/12 15:43:00 [只看该作者]

Dim bar As WinForm.TabControl = e.Sender
msgbox(bar.SelectedPage.Text) ‘是提货单么?
Select Case bar.SelectedPage.Text
    Case "提货单"
msgbox(1) ‘能不能弹出?
         MainTable = Tables("表1")
    Tables("表1").AddNew

End Select

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


加好友 发短信
等级:小狐 帖子:349 积分:3329 威望:0 精华:0 注册:2016/3/8 18:13:00
  发帖心情 Post By:2021/5/12 16:08:00 [只看该作者]

老师,运行没任何显示。还想请问下调试的时候是像实例中一样插入msgbox的吗?

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107035 积分:544406 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/5/12 16:15:00 [只看该作者]

要切换不同页签SelectedIndexChanged事件才会触发的,只有一个页签,何来的选择不同页面?

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


加好友 发短信
等级:小狐 帖子:349 积分:3329 威望:0 精华:0 注册:2016/3/8 18:13:00
  发帖心情 Post By:2021/5/12 16:30:00 [只看该作者]

谢谢蓝老师,明白了。还一个问题就是不断切换就不断添新行,请问如何只新添加一行
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


 回到顶部
帅哥,在线噢!
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107035 积分:544406 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/5/12 16:32:00 [只看该作者]

那就不要放到SelectedIndexChanged事件了,建议添加一个新增按钮吧

 回到顶部