- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 请教页面集合相关问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=165281)
-- 发布时间：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
-- 发布时间：2021/5/12 15:22:00
--
tabcontrol控件？为什么代码里使用的是NavBar ？
-- 发布时间：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
-- 发布时间：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
-- 发布时间：2021/5/12 16:08:00
--
老师，运行没任何显示。还想请问下调试的时候是像实例中一样插入msgbox的吗？
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
-- 发布时间：2021/5/12 16:15:00
--
要切换不同页签SelectedIndexChanged事件才会触发的，只有一个页签，何来的选择不同页面？
-- 发布时间：2021/5/12 16:30:00
--
谢谢蓝老师，明白了。还一个问题就是不断切换就不断添新行，请问如何只新添加一行
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目1.table |
-- 发布时间：2021/5/12 16:32:00
--
那就不要放到SelectedIndexChanged事件了，建议添加一个新增按钮吧