主题：图表的问题

Dim s As Integer '定义存储图系编号的变量
Dim p As Integer '定义存储数据点编号的变量
Dim Chart As WinForm.Chart = Forms("窗口1").Controls("Chart1") '获得Chart对象的引用
If Chart.CoordToDataIndex(e.x, e.y ,s ,p) Then '如果鼠标位置存在有效的图序和数据点
    Dim Series As WinForm.ChartSeries = Chart.SeriesList(s) '获得鼠标位置的图序
    Dim msg as string
    msg = "单击的是第" & (s+1) & "个图系的第" & (p+1) & "个数据点，该点的值为 "
    msg = msg & "(X = " & Series.X(p) & ", Y = " & Series.Y(p) & ")"
    Messagebox.Show(msg)
End If

如果我将图表绑定到了客户和他的销售额，现在希望点击的时候返回客户编号 要怎么设置