- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 手机图表不显示 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=119026)
-- 发布时间：2018/5/16 11:55:00
-- 手机图表不显示
-- 发布时间：2018/5/16 11:55:00
--
显示只是x，和y轴
-- 发布时间：2018/5/16 11:56:00
--
请大师指点
-- 发布时间：2018/5/16 12:10:00
--
打开命令窗口，执行下面代码，看生成的图表是否正确
Dim Chart As New ChartBuilder \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart.PrintWidth = 140 \'宽度设为140毫米
Chart.PrintHeight = 100
Chart.VisualEffect = True
Chart.DataSource = "调度日报" \'设置绑定表
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'增加一个图系
Chart.AxisX.DateType = True \'X轴是日期型
Series.X.DataField = "选矿工序化验原始记录_时间" \'X轴绑定到产品列
Series.Y.DataField = "选矿工序化验原始记录_镜铁矿_精矿_品位" \'Y轴绑定到数量列
chart.Image.save("d:\\test.wmf")
Dim proc As new Process
proc.file = "d:\\test.wmf"
proc.start
-- 发布时间：2018/5/16 12:11:00
--
如果图片不正确，说明你表名、列名写错。
如果自己不会调试，上传表个测试。
-- 发布时间：2018/5/16 12:23:00
--
我是想让手机网页打开显示
-- 发布时间：2018/5/16 12:25:00
--
执行后
此主题相关图片如下：qq图片20180516122405.png
-- 发布时间：2018/5/16 12:29:00
--
如何，让手机显示呢？另外怎么显示为平滑的线条呢，请指教，谢谢
-- 发布时间：2018/5/16 14:28:00
--
Dim Chart As New ChartBuilder \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart.PrintWidth = 140 \'宽度设为140毫米
Chart.PrintHeight = 100
Chart.DataSource = "调度日报" \'设置绑定表
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'增加一个图系
Chart.AxisX.DateType = True \'X轴是日期型
series.FitType = FitTypeEnum.Spline
Series.X.DataField = "选矿工序化验原始记录_时间" \'X轴绑定到产品列
Series.Y.DataField = "选矿工序化验原始记录_镜铁矿_精矿_品位" \'Y轴绑定到数量列
wb.AddPageTitle("","ph1","镜精矿品位")
wb.InsertHTML("<img width=\'100%\' src=\'" & wb.ImageToBase64(Chart.Image) & "\'/>")
e.WriteString(wb.Build)