Foxtable(狐表)用户栏目专家坐堂 → 版主好~请教一个问题~


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

主题:版主好~请教一个问题~

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


加好友 发短信
等级:一尾狐 帖子:411 积分:4303 威望:0 精华:0 注册:2018/7/18 21:08:00
版主好~请教一个问题~  发帖心情 Post By:2019/5/3 21:03:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20190503210053.png
图片点击可在新窗口打开查看


Dim tb1 As WinForm.Table = Forms("当前查询").Controls("Table1")
Dim jzzd As WinForm.ComboBox = Forms("共享窗口").Controls("交战主队")
Dim jzkd As WinForm.ComboBox = Forms("共享窗口").Controls("交战客队")
If jzkd.Text>"" And jzzd.Text>"" Then
Dim count As Integer = tb1.Table.DataTable.Compute("count(主队名称)", "主队名称 = '" & jzzd.Text & "'")
'Forms("共享窗口").Controls("TopicBar1").Pages("场次统计").Links("主场数").Text = "主场数(" & count & "场)"
Forms("当前查询").Controls("TabControl1").Pages("主队主场").Pages(0).Text= "(" & count & "场)"
End If


提示一个这样的错误,navbar是links,这个不知道该定义在哪个位置上。。。。。。。。。。。。。。

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/5/4 9:49:00 [只看该作者]

Forms("当前查询").Controls("TabControl1").Pages("主队主场").Pages(0).Text= "(" & count & "场)"

 

改成

 

Forms("当前查询").Controls("TabControl1").tabPages(0).Text= "(" & count & "场)"

 

或者

 

Forms("当前查询").Controls("TabControl1").tabPages("主队主场").Text= "(" & count & "场)"


 回到顶部