此主题相关图片如下:qq截图20150429112546.png
此主题相关图片如下:qq截图20150429112357.png
如图,走户进度百分比统计表中显示的是0.00%这种格式的,为什么到了图表中显示成这么多位的小数了?
代码如下,哪位老师给看看
If DataTables.Contains("走户进度百分比统计表") = False Then '不存在这个表
Dim b As New SQLGroupTableBuilder("走户进度百分比统计表","十二组")
b.Groups.AddDEF("居民组")
b.Totals.AddDEf("居民组",AggregateEnum.Count,"契证数")
b.Totals.Addexp("已走户","iif(协议日期 Is null,0,1)") '生成临时统计表
'b.Totals.Addexp("未走户","iif(协议日期 Is null,1,0)")
b.Build
DataTables("走户进度百分比统计表").DataCols.Add("百分比",Gettype(Double),"已走户/契证数")
DataTables("走户进度百分比统计表").datacols("百分比").SetFormat("0.00%")
End If
Dim Chart As WinForm.Chart '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Chart = e.Form.Controls("Chart1") ' 引用窗口中的图表
Chart.VisualEffect = False '风格
Chart.ChartType = ChartTypeEnum.Bar '图表类型该为Bar(条形)
Chart.DataSource = "走户进度百分比统计表" '设置绑定表
Chart.AxisX.ClearValueLabel '清除文本残留影响
Chart.SeriesList.Clear() '清除图表原来的图系
Series = Chart.SeriesList.Add() '增加第一个图系
Series.Text = "百分比"
Series.X.DataField = "居民组" 'X轴绑定到产品列
Series.Y.DataField = "百分比" 'Y轴绑定到数量列
Series.DataLabelText = "{#YVAL}" '显示数值
Chart.LegendVisible = True '显示图列
Chart.LegendCompass= CompassEnum.South '图列显示在南方(底端)
Series.DataLabelText = "{#YVAL}" '显示数值
Chart.Stacked = False '图形叠加
Chart.BarClusterWidth = 60 '横向宽度
Chart.AxisY.Major = 1 '主刻度间隔值