以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  图表标识问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=135411)
--  作者：rjh4078
--  发布时间：2019/5/25 18:23:00
--  图表标识问题

Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart = e.Form.Controls("Chart1") \' 引用窗口中的图表
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'增加一个图系

dim t as table=tables("销售汇总")
Series.Length = t.rows.count \'新增图系包括10个数据点
Series.TooltipText = "X = {#XVAL}, Y = {#YVAL}"
For i As integer = 0 to t.rows.count-1 \'指定每个数据点的位置
    Series.X(i) = i \'指定水平坐标
    Series.Y(i) = t.rows(i)("销售额") \'垂直坐标用随机数生成

Chart.AxisX.SetValueLabel(i, t.Rows(i)("客户名称"))
Next


红色部分 这个 tiptext 我想写成： 客户：& t.Rows(i)("客户名称") & t.Rows(i)("统计期间") & "销售额：" & t.Rows(i)("销售额")

要用什么方法
--  作者：有点甜
--  发布时间：2019/5/26 14:20:00
--  

参考

 

http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=96833&skin=0

 

http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=123956&skin=0

 
--  作者：rjh4078
--  发布时间：2019/5/26 16:17:00
--  
这几个例子都看过了  不是我想要的
--  作者：rjh4078
--  发布时间：2019/5/26 16:18:00
--  
我是想实现在图表上出现TooltipText 并且内容我能自定义 我写那个只是举个例子 
--  作者：有点甜
--  发布时间：2019/5/26 19:59:00
--  

认认真真看

 

http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=96833&skin=0