图示统计数据 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

老师，您好，我现在窗口中实现图示统计数据，有办法可以实现吗？类似在窗口显示此种图示类型

此主题相关图片如下：d0e86625-f703-4937-93df-08b2a92f04fc.png

老师，您好，窗口编程形成的图表如图所示，如果我想把数据表示改变成百分数的形式，如何更改？数据表中的数据是以百分数的形式出现，并保留两位小数

此主题相关图片如下：d1d00e4d-d82b-4951-884c-4ca298ec7778.png

老师，您好，根据您提供的案例可生成如下图表，但是新的数据输入之后图表上面显示的数据是非数字而不是数据表中的数字，如图所示，请问这样的情况如何更改？谢谢
图片点击可在新窗口打开查看

此主题相关图片如下：679ffbbb-866f-4afa-a0f1-1a1bf11fa873.png

老师，您好，还有另外一个问题，我如果想动态的更改Y轴怎么实现？现在Y轴的数据是合格率基准、月合格率2018和月合格率2019，如果我想Y轴内容根据数据列的变化而实现动态变化，有办法实现吗？

1.第一个问题怎么解决？就是行增加新数据的时候图表显示百分数，而不是显示“非数字”三个字

2.动态更改Y轴，就是如果我增加一列，列的名称为月合格率_2020，是不是只能通过重新增加编程语句实现？

老师，您好，这是月合格率_2019合格率这一列的代码，添加在窗口事件afterload中，现在面临的问题是如果输入新的数值时，线形图上面显示“非数字”三个字，只有重新窗口项目之后才会显示百分数，怎么实现增加行数值时，线型图同步显示百分数？

Dim Chart As WinForm.Chart

Dim Series As WinForm.ChartSeries

Chart= e.Form.Controls("Chart1") '

Chart.DataSource = "物料检验合格率"

Chart.SeriesList.Clear()

Chart.AxisX.Major = 2

Series = Chart.SeriesList.Add()

Series.Text = "月合格率_2019年"

Series.X.DataField = "月份"

Series.Y.DataField = "月合格率_2019年"

Dim c1Chart3 = Chart.basecontrol

Dim lbls2 = c1Chart3.ChartLabels

For i As Integer = 0 To Tables("物料检验合格率").Rows.Count-1

Dim lbl2 As C1.Win.C1Chart.Label = lbls2.LabelsCollection.AddNewLabel()

lbl2.Text = Format(series.y(i), "0.00%")

lbl2.AttachMethod = C1.Win.C1Chart.AttachMethodEnum.DataIndex

lbl2.AttachMethodData.GroupIndex = 0

lbl2.AttachMethodData.SeriesIndex = 2

lbl2.AttachMethodData.PointIndex = i

lbl2.Style.ForeColor = Color.Red

lbl2.style.font = new font("宋体", 10)

lbl2.Compass = LabelCompassEnum.north

lbl2.Visible = True

Chart.LegendVisible = True

Chart.LegendCompass= CompassEnum.South

变成这个语句之后lbl2.Text = Format(val(series.y(i)), "0.00%")，仍然出现了相同的问题
图片点击可在新窗口打开查看

此主题相关图片如下：626a64d7-4fbb-4508-a00b-05b8ece3250f.png

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目1_201904221730.zip

重新打开项目或者窗口的时候可以正常使用，但是如果应用窗口，在窗口中录入数据时，录入完成后会会显示如下图片所示：
图片点击可在新窗口打开查看

此主题相关图片如下：b7e44bf5-f622-42b6-b32a-72566a614123.png

主题：图示统计数据