以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求助:sql语句用fill加载到表格控件再绘图,日期字段在座标上显示成了数字。  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=161405)

--  作者:wfkbabro
--  发布时间:2021/3/16 16:10:00
--  求助:sql语句用fill加载到表格控件再绘图,日期字段在座标上显示成了数字。

一、问题:图上X座标是 时间(精确到日),当以“标准表”(比如表A表B表C)作绘图时在X座标能显示为正常时间(2018-1-1类似字样),当以sql填充表格控件后再绘图时在X座标将时间显示为了数字(如图上箭头处),不知道怎么处理。谢谢。


此主题相关图片如下:snipaste_2021-03-16_16-04-15.png
按此在新窗口浏览图片


 

二、参考的两段代码:

1.窗口中的表格控件,用sql加载内容

t1= "密度"

t0 = "S -e-l-ect 时间,结果提示自动计算 From 省略..."
DataTables("窗口1_Table1").fill(t0,True)

 

2.绘图代码

 

        Case "绘图"
            Dim Chart As WinForm.Chart \'定义一个图表变量
            Dim Series As WinForm.ChartSeries \'定义一个图系变量
            Dim t As Table = Tables("窗口1_Table1") \'定义一个变量t引用数据表
            Chart = Forms("窗口1").Controls("Chart1") \' 引用窗口中的图表
            Chart.ChartType = ChartTypeEnum.Bar \'图表类型该为Bar(条形)
            Chart.DataSource = "窗口1_Table1" \'设置绑定表
            Chart.SeriesList.Clear() \'清除图表原来的图系
            Series = Chart.SeriesList.Add() \'增加一个图系
            Series.X.DataField = "时间" \'X轴绑定到产品列
            Series.Y.DataField = "结果提示自动计算" \'Y轴绑定到数量列
            \'Series.DataLabelText = "{#YVAL}"

[此贴子已经被作者于2021/3/16 16:24:39编辑过]

--  作者:有点蓝
--  发布时间:2021/3/16 16:14:00
--  
参考:http://www.foxtable.com/webhelp/topics/1028.htm
--  作者:wfkbabro
--  发布时间:2021/3/16 16:26:00
--  
以下是引用有点蓝在2021/3/16 16:14:00的发言:
参考:http://www.foxtable.com/webhelp/topics/1028.htm

比星!谢谢蓝版。