DataLabelCompass

返回或设置标示的位置，LabelCompassEnum型枚举，可选的值有：

Auto
East
North
NorthEast
NorthWest
Orthogonal
Radial
South
SouthEast
SouthWest
West
RadialText

除了饼图外，通常用默认的设置即可。

例如有个数据表：

要生成一个饼图，代码为：

Dim Chart As WinForm.Chart = e.Form.Controls("Chart1") '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Dim t As Table = Tables("统计表1") '定义一个变量t引用数据表
Dim sm As Integer = t.Compute("Sum(数量)") '计算总数量
Chart.ChartType = ChartTypeEnum.Pie '图表1类型改为Bar(条形)
Chart.ShowOutLine = False '不绘制边框
For Each r As Row In t.Rows
    Series = Chart.SeriesList.Add() '增加一个图系
    Series.Length = 1 '一个系列只能包括一个值
    Series.Text = r("产品") '设置图系的标题
    Series.Y(0) = r("数量") '指定值
    Series.DataLabelText = r("产品") &"(" &  Math.Round(r("数量") * 100 / sm, 2) & "%)" '计算百分比
    Series.DataLabelCompass = LabelCompassEnum.RadialText '标示文本径向排列|
    Series.DataLabelOffset = -4 '向内偏移4个像素
Next

生成的饼图为：