- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 图表 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=42771)
-- 发布时间：2013/11/21 15:16:00
-- 图表
Dim cb As new CrossTableBuilder("客户欠款",jb.BuildSQL)
cb.C
cb.VGroups.AddDef("客户")
cb.HGroups.AddDef("作业日期",DateGroupEnum.Year,"年")
cb.HGroups.AddDef("作业日期",DateGroupEnum.Month,"月")
cb.Totals.AddDef("利润分析")
cb.Build()
Dim Chart As WinForm.Chart = e.Form.Controls("Chart4")
Dim Series As WinForm.ChartSeries
Chart.DataSource = "客户欠款"
Chart.ChartType = ChartTypeEnum.Bar
Chart.SeriesList.Clear()
For Each i As Col In Tables("客户欠款").Cols
If i.Name <> "月" Then
Series = Chart.SeriesList.Add()
Series.Text = i.Caption
Series.X.DataField = "月"
Series.Y.DataField = i.Name
Series.DataLabelText = "{#YVAL}"
Series.DataLabelBackColor = Color.DimGray
Series.DataLabelForeColor = Color.white
Series.DataLabelCompass = LabelCompassEnum.West
Series.Y.DataType = Gettype(Double)
End If
Next
Chart.Axisx.Major = 1
Chart.Inverted = True
Chart.Stacked = True
Chart.LegendVisible = True
Chart.LegendCompass = CompassEnum.East
哪位高手帮忙。x绑定的是”月“ 。希望显示出来的是。年和月 比如2013年11月
此主题相关图片如下：2013-11-21 15-18-31.jpg
-- 发布时间：2013/11/21 15:40:00
--
这个好像没有办法呢.
-- 发布时间：2013/11/21 15:45:00
--
For Each r As Row In Tables("客户欠款").Rows
r("月")=r("年") & r("月")
Next
加这个代码为什么会出错
此主题相关图片如下：2013-11-21 15-44-15.jpg
-- 发布时间：2013/11/21 15:48:00
--
月份是数值类型,不能把字符串赋值给它
-- 发布时间：2013/11/21 15:49:00
--
三楼的错误，将月份列改为整数型吧。
搞不定的话，直接上个简单的例子来测试吧，不要整个项目上传。
-- 发布时间：2013/11/21 16:11:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
-- 发布时间：2013/11/21 16:17:00
--
不用绑定，逐个点添加数据，看这里的方法二：
http://www.foxtable.com/help/topics/0968.htm
这样可以随心设置坐标轴的显示格式。
-- 发布时间：2013/11/21 16:42:00
--
给下代码吧。理解不了
-- 发布时间：2013/11/21 16:48:00
--
呵呵，不能偷懒，这里的方法二，你不可能理解不了：
http://www.foxtable.com/help/topics/0968.htm
-- 发布时间：2013/11/21 17:02:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目100.table |