📄 axisscalerange.aspx
字号:
<%@ Page Language="VB" Description="dotnetCHARTING Component" %>
<%@ Register TagPrefix="dotnet" Namespace="dotnetCHARTING" Assembly="dotnetCHARTING"%>
<%@ Import Namespace="System.Drawing" %>
<HTML>
<HEAD>
<TITLE>.netCHARTING Sample</TITLE>
<script runat="server">
Sub Page_Load(sender as Object ,e as EventArgs )
Chart.TempDirectory = "temp"
Chart.Debug = true
Chart2.TempDirectory = "temp"
Chart2.Debug = true
Chart3.TempDirectory = "temp"
Chart3.Debug = true
Chart.Title = "Y axis range set to 5 - 725 with a logarithmic scale"
Chart2.Title = "Y axis high range set to 53 with a normal numeric scale."
Chart3.Title = "X axis range set 12/1/04 - 9/1/05"
' This sample will demonstrate how how scale ranges can be set.
' Set the axis scale.
Chart.YAxis.Scale = Scale.Logarithmic
' The range can be set using this code:
Chart.YAxis.ScaleRange.ValueHigh = 725
Chart.YAxis.ScaleRange.ValueLow = 50
' Or using this code:
Chart.YAxis.ScaleRange = new ScaleRange(5, 725)
' Add arbitrary ticks at scale bounds.
Chart.YAxis.ExtraTicks.Add(new AxisTick(725))
Chart.YAxis.ExtraTicks.Add(new AxisTick(5))
' CHART 2
' Specify an interval and a high range value.
Chart2.YAxis.Interval = 20
Chart2.YAxis.ScaleRange.ValueHigh = 53
' CHART 3
' Specify the range using a new scale range object.
Chart3.XAxis.ScaleRange = new ScaleRange(new DateTime(2004,12,1), new DateTime(2005,9,1))
' *DYNAMIC DATA NOTE*
' This sample uses random data to populate the chart. To populate
' a chart with database data see the following resources:
' - Classic samples folder
' - Help File > Data Tutorials
' - Sample: features/DataEngine.aspx
Chart.SeriesCollection.Add(getRandomData2())
Chart2.SeriesCollection.Add(getRandomData2())
Chart3.SeriesCollection.Add(getRandomData())
End Sub
Function getRandomData() As SeriesCollection
Dim SC As SeriesCollection = new SeriesCollection()
Dim myR AS Random = new Random()
Dim a,b as Integer
Dim s as Series
Dim e As Element
Dim dt as DateTime = new DateTime(2005,1,1)
For a = 0 To 0
s = new Series()
s.Name = "Series " & a
For b = 0 To 3
e = new Element()
e.YValue = myR.Next(50)
e.XDateTime = dt
dt = dt.AddMonths(1)
s.Elements.Add(e)
Next b
SC.Add(s)
Next a
return SC
End Function
Function getRandomData2() As SeriesCollection
Dim SC As SeriesCollection = new SeriesCollection()
Dim myR AS Random = new Random()
Dim a,b as Integer
Dim s as Series
Dim e As Element
For a = 0 To 0
s = new Series()
s.Name = "Series " & a
For b = 0 To 3
e = new Element()
e.Name = "Element " & b
e.YValue = myR.Next(50)
s.Elements.Add(e)
Next b
SC.Add(s)
Next a
return SC
End Function
</script>
</HEAD>
<BODY>
<DIV align="center">
<dotnet:Chart id="Chart" runat="server" Width="568px" Height="344px">
</dotnet:Chart>
<dotnet:Chart id="Chart2" runat="server" Width="568px" Height="344px">
</dotnet:Chart>
<dotnet:Chart id="Chart3" runat="server" Width="568px" Height="344px">
</dotnet:Chart>
</DIV>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -