- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 菜单栏功能组里的筛选 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=102487)
-- 发布时间：2017/6/20 22:53:00
-- 菜单栏功能组里的筛选
Vars("SysUpdatePrintInfo") = True
\'任务二
With RibbonTabs("功能区1")("功能组1")("HGroup")
.Items.Clear \'清除原有项目
For Each c As Col In CurrentTable.Cols \'遍历当前表中的列
\'定义一个标准按钮,按钮的名称等于列名称.
Dim b As New RibbonMenu.Button(c.Name)
b.Text = c.Name \'按钮的标题也等于列名称
.Items.Add(b)
Next
End With
例子里显示所有列的名称，我想让它只显示：
1、组合框中只显示文本列名称？
2、组合框中只显示数据列名称？
3、组合框中只显示表达显列名称？
-- 发布时间：2017/6/20 23:06:00
--
1、http://www.foxtable.com/webhelp/scr/1375.htm
| IsString | 判断该列是否是字符串型 |
For Each dc As DataCol In CurrentTable.DataTable.DataCols \'遍历当前表中的列
If dc.Expression > "" Then
msgbox("这是表达式列")
Else
msgbox("这是数据列")
End If
Next
-- 发布时间：2017/6/21 9:29:00
--
新手，请谅解，正在学习当中。
此主题相关图片如下：1.png
此主题相关图片如下：2.png
此主题相关图片如下：3.png
水平分组：只显示字符型列名称此主题相关图片如下：1.png此主题相关图片如下：2.png此主题相关图片如下：3.png垂直分组：只显示字符型列名称
统 计：只显示数字型列名称
-- 发布时间：2017/6/21 9:41:00
--
软件内部例子那样一个个设置太麻烦，不同表格的时候还统计不上。
-- 发布时间：2017/6/21 9:47:00
--
现在你的问题是什么？哪里不会？具体例子发上来。
-- 发布时间：2017/6/21 10:20:00
--
1、
水平分组：只显示字符型列名称 如：（单位、项目） 垂直分组：只显示字符型列名称 如：（单位、项目） 统 计：只显示数字型列名称 如：（资金） 统计列里只显示数据列，水平分组、垂直分组里只显示字符列的内容。 |
[此贴子已经被作者于2017/6/21 10:42:37编辑过]
-- 发布时间：2017/6/21 10:21:00
--
具体项目上传上来。
-- 发布时间：2017/6/21 10:44:00
--
我把例子传上去了，我也不知道传没传上去。我这里看不到附件呢？
-- 发布时间：2017/6/21 10:45:00
--
跟上传图片一样上传你的项目。
-- 发布时间：2017/6/21 10:52:00
--
表A统计完了之后，统计表B时候没有清屏，所以第二个价表格就统计不出来。