问题：y坐标的数值排序错误？？？？请求专家解决，谢谢！！！

1、这是表：

住房 75928 30157
交通 7775 
饮食 5555 
子女 4440 1455
日用品 5555 1309
个人护理 5553 
社交活动 776 
娱乐 5555 
贷款/税款 7777 15
储蓄/投资 558 
杂项费  1

这是窗口里按钮的代码：

Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart = e.Form.Controls("Chart1") \' 引用窗口中的图表
Chart.VisualEffect = True \'加上这一行,让你的图表更漂亮
Chart.ChartType = ChartTypeEnum.Bar \'图表类型该为Bar(条形)
Chart.DataSource = "预算支出汇总" \'设置绑定表
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'增加第一个图系
Series.Text = "预算金额"
Series.X.DataField = "分类" \'X轴绑定到产品列
Series.Y.DataField = "预算金额" \'Y轴绑定到数量列
Series = Chart.SeriesList.Add() \'增加第二个图系
Series.Text = "实际支出"
Series.X.DataField = "分类" \'X轴绑定到产品列
Series.Y.DataField = "实际支出" \'Y轴绑定到数量列
Chart.LegendVisible = True \'显示图列
Chart.LegendCompass= CompassEnum.South \'图列显示在南方(底端)

3、这是生成的图表：

1、看不到，图片要上传，别人才能看见。

2、最好连表也传上来。

Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart = e.Form.Controls("Chart1") \' 引用窗口中的图表
Chart.VisualEffect = True \'加上这一行,让你的图表更漂亮
Chart.ChartType = ChartTypeEnum.Bar \'图表类型该为Bar(条形)
Chart.DataSource = "预算支出汇总" \'设置绑定表
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'增加第一个图系
Series.Text = "预算金额"
Series.X.DataField = "分类" \'X轴绑定到产品列
Series.Y.DataField = "预算金额" \'Y轴绑定到数量列

Series.Text = "实际支出"
Series.X.DataField = "分类" \'X轴绑定到产品列
Series.Y.DataField = "实际支出" \'Y轴绑定到数量列

Chart.LegendVisible = True \'显示图列
Chart.LegendCompass= CompassEnum.South \'图列显示在南方(底端)

1、显示的好象是序号。

2、y轴还是不对，顺序是反的。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.table

已发现问题，是列没有设为数值型。

加了你的代码，数据也可以显示了，非常感谢！！！！