- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 关于实例文件中的Excel图表 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=87961)
-- 发布时间：2016/7/23 15:40:00
-- 关于实例文件中的Excel图表
版主老师，我发现实例文件中“Excle图表”这个实例的绘图可以直接通过打开Excel的方式生成多种Excel图片。
有几个问题咨询一下：
1.这个例子里面的“次坐标轴”怎么没法使用呢？
2.如果要在“图表系列”里面增加Excel的“散点图”类型，应该怎么增加？
只需要在内部函数“App_Charts”里面增加散点图及相关的子类型的文字名称吗？绘图的代码我怎么没有看到在哪里？
此主题相关图片如下：散点图.jpg
-- 发布时间：2016/7/23 16:36:00
--
测试没有问题，
此主题相关图片如下：1.jpg
图表类型，看这句代码
Cht.ChartType = Functions.Execute("App_ChartType",e.Form.Controls("ComboBox1").Value,e.Form.Controls("ComboBox2").Value)
1.在下拉框增加项目
2.修改App_Charts和App_ChartType返回正确类型
图表可用类型参考枚举
For Each item As MSExcel.XlChartType In [Enum].GetValues(Gettype(MSExcel.XlChartType ))
Output.Show(item & "-" & item.Tostring())
Next
里面具体枚举对应什么类型，自己网上搜搜吧
-- 发布时间：2016/7/23 17:15:00
--
也就是说，只用修改App_Charts和App_ChartType这两个内部函数，再里面按照ChartType的规范加入图表类型的中文名称就可以了？
我在App_Charts中增加了
Case "散点图"
lst = "平滑线散点图|无数据点折线散点图"
在App_ChartType中增加了
Case "散点图"
Select Case Args(1)
Case "平滑线散点图"
tblx = 113 (这个113这个数字不知道有什么特殊的含义没有？)
Case "无数据点折线散点图"
tblx = 114
End Select
同时 X轴的输入也换成了数据列，但是运行结果是错误提示
.NET Framework 版本：2.0.50727.5420
Foxtable 版本：2016.6.26.1
错误所在事件：窗口,图表设置,Button5,Click
详细错误信息：
对 COM 组件的调用返回了错误 HRESULT E_FAIL。
是不是还要在什么地方加入和下面代码相关的代码啊？
XY (散点图) 散点图 xlXYScatter
平滑线散点图 xlXYScatterSmooth
无数据点折线散点图 xlXYScatterLinesNoMarkers
下面这个代码是哪里的？
图表可用类型参考枚举
For Each item As MSExcel.XlChartType In [Enum].GetValues(Gettype(MSExcel.XlChartType ))
Output.Show(item & "-" & item.Tostring())
Next
[此贴子已经被作者于2016/7/23 17:30:20编辑过]
-- 发布时间：2016/7/24 15:02:00
--
红袍老师，请帮我看看3楼的问题。
-- 发布时间：2016/7/24 15:09:00
--
哪里有113、114？全部类型，运行代码可以得到
For Each item As MSExcel.XlChartType In [Enum].GetValues(Gettype(MSExcel.XlChartType ))
Output.Show(item & "-" & item.Tostring())
Next
-- 发布时间：2016/7/24 15:10:00
--
113 114 我是参考别的自己编的号，不知道这个代码是否有特殊的要求。
-- 发布时间：2016/7/24 15:12:00
--
命令窗口，运行5楼代码啊
-- 发布时间：2016/7/24 15:13:00
--
果然有特殊含义：
1-xlArea
4-xlLine
5-xlPie
15-xlBubble
51-xlColumnClustered
52-xlColumnStacked
53-xlColumnStacked100
54-xl3DColumnClustered
55-xl3DColumnStacked
56-xl3DColumnStacked100
57-xlBarClustered
58-xlBarStacked
59-xlBarStacked100
60-xl3DBarClustered
61-xl3DBarStacked
62-xl3DBarStacked100
63-xlLineStacked
64-xlLineStacked100
65-xlLineMarkers
66-xlLineMarkersStacked
67-xlLineMarkersStacked100
68-xlPieOfPie
69-xlPieExploded
70-xl3DPieExploded
71-xlBarOfPie
72-xlXYScatterSmooth
73-xlXYScatterSmoothNoMarkers
74-xlXYScatterLines
75-xlXYScatterLinesNoMarkers
76-xlAreaStacked
77-xlAreaStacked100
78-xl3DAreaStacked
79-xl3DAreaStacked100
80-xlDoughnutExploded
81-xlRadarMarkers
82-xlRadarFilled
83-xlSurface
84-xlSurfaceWireframe
85-xlSurfaceTopView
86-xlSurfaceTopViewWireframe
87-xlBubble3DEffect
88-xlStockHLC
89-xlStockOHLC
90-xlStockVHLC
91-xlStockVOHLC
92-xlCylinderColClustered
93-xlCylinderColStacked
94-xlCylinderColStacked100
95-xlCylinderBarClustered
96-xlCylinderBarStacked
97-xlCylinderBarStacked100
98-xlCylinderCol
99-xlConeColClustered
100-xlConeColStacked
101-xlConeColStacked100
102-xlConeBarClustered
103-xlConeBarStacked
104-xlConeBarStacked100
105-xlConeCol
106-xlPyramidColClustered
107-xlPyramidColStacked
108-xlPyramidColStacked100
109-xlPyramidBarClustered
110-xlPyramidBarStacked
111-xlPyramidBarStacked100
112-xlPyramidCol
-4169-xlXYScatter
-4151-xlRadar
-4120-xlDoughnut
-4102-xl3DPie
-4101-xl3DLine
-4100-xl3DColumn
-4098-xl3DArea
-- 发布时间：2016/7/24 17:59:00
--
奇怪，唯独没有 仅带数据标记的散点图
XY (散点图) 散点图 xlXYScatter
平滑线散点图 xlXYScatterSmooth
无数据点平滑折线散点图 xlXYScatterSmoothNoMarkers
折线散点图 xlXYScatterLines
无数据点折线散点图 xlXYScatterLinesNoMarkers
-- 发布时间：2016/7/25 8:33:00
--
5楼的代码出来的就是所有的类型了，没有就没有了