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


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

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

帅哥哟,离线,有人找我吗?
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

 回到顶部
帅哥哟,离线,有人找我吗?
weipeng6999
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | 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

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


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

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

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


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


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

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


 回到顶部