📄 multichart.aspx
字号:
<%@ Page Language="VB" debug="true" Description="dotnetCHARTING Component"%>
<%@ Register TagPrefix="dotnet" Namespace="dotnetCHARTING" Assembly="dotnetCHARTING"%>
<%@ Import Namespace="System.Drawing" %>
<script runat="server">
Function getRandomData() As SeriesCollection
Dim SC As SeriesCollection = new SeriesCollection()
Dim myR As Random = new Random()
Dim a,b As Integer
For a=1 To 4
Dim s As Series = new Series()
s.Name = "Series " & a.ToString()
For b=1 To 7
Dim e As Element = new Element()
e.Name = "E " & b.ToString()
e.YValue = myR.Next(50)
s.Elements.Add(e)
Next b
SC.Add(s)
Next a
getRandomData = SC
End Function
Sub Page_Load(sender As Object ,e As EventArgs )
'Set Chart 1 properties
Chart1.Title="My Chart 1"
Chart1.Type = ChartType.Combo
Chart1.DefaultSeries.DefaultElement.Transparency = 35
Chart1.TempDirectory="temp"
Chart1.Use3D=true
Chart1.Debug=true
Chart1.Width = Unit.Parse(420)
Chart1.Height = Unit.Parse(300)
' Add the random data.
Chart1.SeriesCollection.Add(getRandomData())
'Set Chart 2 properties
Chart2.Title="My Chart 2"
Chart2.Type = ChartType.ComboHorizontal
Chart2.DefaultSeries.DefaultElement.Transparency = 35
Chart2.TempDirectory="temp"
Chart2.Use3D=true
Chart2.Debug=true
Chart2.Width = Unit.Parse(420)
Chart2.Height = Unit.Parse(300)
' Add the random data.
Chart2.SeriesCollection.Add(getRandomData())
'Set Chart 3 properties
Chart3.Title="My Chart 3"
Chart3.Type = ChartType.ComboSideBySide
Chart3.DefaultSeries.DefaultElement.Transparency = 35
Chart3.TempDirectory="temp"
Chart3.Use3D=true
Chart3.Debug=true
Chart3.Width = Unit.Parse(420)
Chart3.Height = Unit.Parse(300)
' Add the random data.
Chart3.SeriesCollection.Add(getRandomData())
'Set Chart 4 properties
Chart4.Title="My Chart 4"
Chart4.Type = ChartType.Radar
Chart4.DefaultSeries.DefaultElement.Transparency = 35
Chart4.RadarLabelMode = RadarLabelMode.Outside
Chart4.TempDirectory="temp"
Chart4.Use3D=true
Chart4.Debug=true
Chart4.Width = Unit.Parse(420)
Chart4.Height = Unit.Parse(300)
' Add the random data.
Chart4.SeriesCollection.Add(getRandomData())
'Set Chart 5 properties
Chart5.Title="My Chart 5"
Chart5.Type = ChartType.Pies
Chart5.DefaultSeries.DefaultElement.Transparency = 35
Chart5.TempDirectory="temp"
Chart5.Use3D=true
Chart5.Debug=true
Chart5.Width = Unit.Parse(420)
Chart5.Height = Unit.Parse(300)
' Add the random data.
Chart5.SeriesCollection.Add(getRandomData())
'Set Chart 6 properties
Chart6.Title="My Chart 6"
Chart6.Type = ChartType.Donut
Chart6.DefaultSeries.DefaultElement.Transparency = 35
Chart6.TempDirectory="temp"
Chart6.Use3D=true
Chart6.Debug=true
Chart6.Width = Unit.Parse(420)
Chart6.Height = Unit.Parse(300)
' Add the random data.
Chart6.SeriesCollection.Add(getRandomData())
End Sub
</script>
<html>
<head>
<title>Multi chart sample</title>
</head>
<body>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1">
<tr>
<td width="50%"> <dotnet:Chart id="Chart1" runat="server"/>
</td>
<td width="50%"> <dotnet:Chart id="Chart2" runat="server"/>
</td>
</tr>
<tr>
<td width="50%"> <dotnet:Chart id="Chart3" runat="server"/></td>
<td width="50%"> <dotnet:Chart id="Chart4" runat="server"/></td>
</tr>
<tr>
<td width="50%"> <dotnet:Chart id="Chart5" runat="server"/></td>
<td width="50%"> <dotnet:Chart id="Chart6" runat="server"/></td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -