老师，我有一个显示客户分布的图表，主要列：客户名称、坐标x，坐标y，代码如下：
Tables("客户分布_table1").Filter = "[坐标x] > 0" '在窗口“客户分布”的table1表中筛选出有坐标位置的客户
Dim Chart As WinForm.Chart '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Chart= e.Form.Controls("Chart1") ' 引用窗口中的图表
Chart.SeriesList.Clear() '清除图表原来的图系
Series = Chart.SeriesList.Add() '增加一个图系
Dim u As Integer = Tables("客户分布_table1").Rows.Count
Series.Length = u '新增图系包括u个数据点（有效的数据行）
Series.MarkShape= MarkShapeEnum.Dot '指定数据标记为原点型.
series.MarkSize = 10 '标记点的大小(像素)
Series.LinePattern = LinePatternEnum.None '不显示数据点之间的联线
With Tables("客户分布_table1")
.Position = 0
For i As Integer = 1 To u
Series.X(i) = .Current("坐标x")
Series.Y(i) = .Current("坐标y")
.Position = i
Next
End With
运行没问题，但我想把“客户名称”显示在每个数据点的周围，请教老师要怎么实现？
加好友 
发短信
Post By：2016/8/25 21:00:00 [只看该作者]
