Foxtable(狐表)用户栏目专家坐堂 → [求助]图表绘制的自定义数据标示


  共有3133人关注过本帖平板打印复制链接

主题:[求助]图表绘制的自定义数据标示

帅哥哟,离线,有人找我吗?
atmetmicoo
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:531 积分:4155 威望:0 精华:0 注册:2012/11/26 21:54:00
[求助]图表绘制的自定义数据标示  发帖心情 Post By:2016/12/16 13:28:00 [只看该作者]

Dim Chart As WinForm.Chart
Dim Series As WinForm.ChartSeries 
Chart= Forms("Chart").Controls("Chart1") 
Chart.SeriesList.Clear() '清除图表原来的图系
Series = Chart.SeriesList.Add() '增加一个图系
Series.Length = Tables("销售排行榜").Rows.Count 
Series.MarkShape= MarkShapeEnum.Diamond 
Series.MarkColor = Color.Red 
Series.LinePattern = LinePatternEnum.None 

For i As Integer = 0 To Tables("销售排行榜").Rows.Count - 1
    Tables("销售排行榜").Position = i
    Series.X(i) = Tables("销售排行榜").Current("努力度评分")
    Series.Y(i) = Tables("销售排行榜").Current("销售金额")
    Series.DataLabelText  = Tables("销售排行榜").Current("员工") ’数据标示识最后一列的数字,如何逐个显示
Next


图片点击可在新窗口打开查看此主题相关图片如下:散点图.png
图片点击可在新窗口打开查看

各位老师好,如上图,我需要绘制一个散点图,每个业务员根据努力度X销售金额Y形成一个坐标,每个坐标都要显示各自的名字,但是我这里设置后,怎么每个坐标的显示一样的,如果我希望每个坐标的数据标示都显示为对应销售员的名字,该如何做,谢谢?


 回到顶部
总数 14 1 2 下一页