Foxtable(狐表)用户栏目专家坐堂 → 如何返回标准按钮的名称?


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

主题:如何返回标准按钮的名称?

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


加好友 发短信
等级:狐神 帖子:6887 积分:43621 威望:0 精华:0 注册:2009/3/2 14:07:00
如何返回标准按钮的名称?  发帖心情 Post By:2011/4/27 10:00:00 [只看该作者]

如何返回标准按钮的名称?
[此贴子已经被作者于2011-4-27 10:00:34编辑过]

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/4/27 10:00:00 [只看该作者]

窗口的按钮不是有Name属性吗?


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


加好友 发短信
等级:狐神 帖子:6887 积分:43621 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2011/4/27 10:02:00 [只看该作者]

        Dim b As New RibbonMenu.Button(c.Name)
        b.Text = c.Name
'按钮的标题也等于列名称
        .Items.Add(b)

我试试这个,看一下。

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/4/27 10:04:00 [只看该作者]

启动foxtable,执行:

 

Dim tx As RibbonMenu.Button = RibbonTabs("Common").Groups("Data").Items("InsertRow")
output.show(tx.name)


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


加好友 发短信
等级:狐神 帖子:6887 积分:43621 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2011/4/27 10:11:00 [只看该作者]

我的目的是点某一个菜单的“标准按钮”,就能获取这个标准按钮的名称,在菜单设计时,如何写代码?

[此贴子已经被作者于2011-4-27 10:11:20编辑过]

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


加好友 发短信
等级:狐神 帖子:6887 积分:43621 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2011/4/27 10:12:00 [只看该作者]

以下是引用狐狸爸爸在2011-4-27 10:04:00的发言:

启动foxtable,执行:

 

Dim tx As RibbonMenu.Button = RibbonTabs("Common").Groups("Data").Items("InsertRow")
output.show(tx.name)

这是判断某个按钮是否存在。


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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/4/27 10:12:00 [只看该作者]

messagebox.show(e.button.name)

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


加好友 发短信
等级:狐神 帖子:6887 积分:43621 威望:0 精华:0 注册:2009/3/2 14:07:00
  发帖心情 Post By:2011/4/27 10:12:00 [只看该作者]

我看看

 回到顶部