|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
缺点:安全性不是太差了,还行,只要你充分利用系统自带的工具;唯一缺点就是执行效率慢,如何进行网站优化以后,效果会比较好。控件|图表<objectid=ChartSpace1classid=CLSID:0002E500-0000-0000-C000-000000000046style="width:100%;height:350"></object>
<SCRIPTLANGUAGE="VBSCRIPT">
SUBWindow_OnLoad()
Dimcategories(3),values(3)
获得已定名的常量工具,在今后的剧本中利用
Setc=ChartSpace1.Constants
设置图表事情区题目
ChartSpace1.HasChartSpaceTitle=True
ChartSpace1.ChartSpaceTitle.Caption="ChartSpaceTitle"
设置图表事情区的图例
ChartSpace1.HasChartSpaceLegend=True
图例地位,个中c.*为地位列举值,值列表以下
chLegendPositionTop:顶端
chLegendPositionLeft:右边
chLegendPositionRight:右侧
chLegendPositionBottom:底部
chLegendPositionAutomatic:主动
ChartSpace1.ChartSpaceLegend.Position=c.chLegendPositionRight
categories(0)="White"
categories(1)="Black"
categories(2)="Asian"
categories(3)="Latino"
将图表增加到图表事情区
ChartSpace1.Charts.Add
将新系列增加到图表事情区的指定图表中,下同
Seta=ChartSpace1.Charts(0).SeriesCollection.Add
指定新系列的范例,C.*为范例列举值,列表以下:
chChartTypeCombo
chChartTypeColumnClustered
chChartTypeColumnStacked
chChartTypeColumnStacked100
chChartTypeBarClustered
chChartTypeBarStacked
chChartTypeBarStacked100
chChartTypeLine
chChartTypeLineMarkers
chChartTypeLineStacked
chChartTypeLineStackedMarkers
chChartTypeLineStacked100
chChartTypeLineStacked100Markers
chChartTypeSmoothLine
chChartTypeSmoothLineMarkers
chChartTypeSmoothLineStacked
chChartTypeSmoothLineStackedMarkers
chChartTypeSmoothLineStacked100
chChartTypeSmoothLineStacked100Markers
chChartTypePie
chChartTypePieExploded
chChartTypePieStacked
chChartTypeScatterMarkers
chChartTypeScatterSmoothLineMarkers
chChartTypeScatterSmoothLine
chChartTypeScatterLineMarkers
chChartTypeScatterLine
chChartTypeScatterLineFilled
chChartTypeBubble
chChartTypeBubbleLine
chChartTypeArea
chChartTypeAreaStacked
chChartTypeAreaStacked100
chChartTypeDoughnut
chChartTypeDoughnutExploded
chChartTypeRadarLine
chChartTypeRadarLineMarkers
chChartTypeRadarLineFilled
chChartTypeRadarSmoothLine
chChartTypeRadarSmoothLineMarkers
chChartTypeStockHLC
chChartTypeStockOHLC
chChartTypePolarMarkers
chChartTypePolarLine
chChartTypePolarLineMarkers
chChartTypePolarSmoothLine
chChartTypePolarSmoothLineMarkers
共47个,谁有乐趣谁逐一的试吧,我懒。
范例分歧,撑持的办法也有所分歧,本文针对chChartTypeColumnClustered。
a.Type=c.chChartTypeColumnClustered
ChartSpace1.Charts(0).SeriesCollection.Add
ChartSpace1.Charts(0).SeriesCollection.Add
values(0)=0.2
values(1)=0.06
values(2)=0.17
values(3)=0.13
设置系列的名字,将显现于图例傍边,下同
ChartSpace1.Charts(0).SeriesCollection(0).Caption="Perot"
设定品种称号,下同
ChartSpace1.Charts(0).SeriesCollection(0).SetDatac.chDimCategories,c.chDataLiteral,categories
设置系列的值,下同
ChartSpace1.Charts(0).SeriesCollection(0).SetDatac.chDimValues,c.chDataLiteral,values
values(0)=0.38
values(1)=0.82
values(2)=0.28
values(3)=0.62
ChartSpace1.Charts(0).SeriesCollection(1).Caption="Clinton"
ChartSpace1.Charts(0).SeriesCollection(1).SetDatac.chDimCategories,c.chDataLiteral,categories
ChartSpace1.Charts(0).SeriesCollection(1).SetDatac.chDimValues,c.chDataLiteral,values
values(0)=0.42
values(1)=0.12
values(2)=0.55
values(3)=0.25
ChartSpace1.Charts(0).SeriesCollection(2).Caption="Bush"
ChartSpace1.Charts(0).SeriesCollection(2).SetDatac.chDimCategories,c.chDataLiteral,categories
ChartSpace1.Charts(0).SeriesCollection(2).SetDatac.chDimValues,c.chDataLiteral,values
设定指定轴的出发点合格式,String范例
个中,c.*为轴范例的列举值,值列表以下:
chAxisPositionLeft
chAxisPositionCircular
chAxisPositionRadial
chAxisPositionRight
chAx</p>减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件,简单易用,无需专业技术支持。 |
|