⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 emptyelements1.aspx

📁 掌握学习.net开发的非常好的资料
💻 ASPX
字号:
<%@ Page Language="VB"  debug="true" Description="dotnetCHARTING Component" %>
<%@ Register TagPrefix="dotnet"  Namespace="dotnetCHARTING" Assembly="dotnetCHARTING"%>
<%@ Import Namespace="System.Drawing" %>
<HTML>
	<HEAD>
		<TITLE>Empty Element 1</TITLE>
		<script runat="server">




Sub Page_Load(sender As [Object], e As EventArgs)
   
   
   Chart.Type = ChartType.ComboSideBySide 'Horizontal;
   Chart.Width = Unit.Parse(600)
   Chart.Height = Unit.Parse(200)
   Chart.TempDirectory = "temp"
   Chart.Use3D = True
   Chart.Debug = True
   Chart.LegendBox.Position = LegendBoxPosition.None
   
   
   
   ' This sample will demonstrate advanced empty element handling. (Modes)
   ' Changing the default series type will show how different types behave with empty elements.
   Chart.DefaultSeries.Type = SeriesType.AreaLine
   
   
   ' First we get our data, if you would like to get the data from a database you need to use
   ' the data engine. See sample: features/dataEngine.aspx. Or the dataEngine tutorial in the help file.
   Dim mySC As SeriesCollection = getData()
   
   
   ' EmptyElementMode.None
   mySC(3).EmptyElement.Mode = EmptyElementMode.None
   mySC(3).Name = "Mode: None"
   
   ' EmptyElementMode.Ignore;
   mySC(0).EmptyElement.Mode = EmptyElementMode.Ignore
   mySC(0).Name = "Mode: Ignore"
   
   ' EmptyElementMode.Fill;
   mySC(1).EmptyElement.Mode = EmptyElementMode.Fill
   mySC(1).Name = "Mode: Fill"
   
   ' EmptyElementMode.TreatAsZero;
   mySC(2).EmptyElement.Mode = EmptyElementMode.TreatAsZero
   mySC(2).Name = "Mode: TreatAsZero"
   
   
   
   
   ' Add the random data.
   Chart.SeriesCollection.Add(mySC)
End Sub 'Page_Load
 



Function getData() As SeriesCollection
   Dim sc As New SeriesCollection()
   
   Dim s1 As New Series()
   s1.Elements.Add(New Element("1", 8))
   s1.Elements.Add(New Element("2", 8))
   s1.Elements.Add(New Element("3", Double.NaN))
   s1.Elements.Add(New Element("4", Double.NaN))
   s1.Elements.Add(New Element("5", 5))
   s1.Elements.Add(New Element("6", 5))
   
   Dim s2 As New Series()
   s2.Elements.Add(New Element("1", 8))
   s2.Elements.Add(New Element("2", 8))
   s2.Elements.Add(New Element("3", Double.NaN))
   s2.Elements.Add(New Element("4", Double.NaN))
   s2.Elements.Add(New Element("5", 5))
   s2.Elements.Add(New Element("6", 5))
   
   Dim s3 As New Series()
   s3.Elements.Add(New Element("1", 5))
   s3.Elements.Add(New Element("2", 5))
   s3.Elements.Add(New Element("3", Double.NaN))
   s3.Elements.Add(New Element("4", Double.NaN))
   s3.Elements.Add(New Element("5", 8))
   s3.Elements.Add(New Element("6", 8))
   
   Dim s4 As New Series()
   s4.Elements.Add(New Element("1", 5))
   s4.Elements.Add(New Element("2", 5))
   s4.Elements.Add(New Element("3", Double.NaN))
   s4.Elements.Add(New Element("4", Double.NaN))
   s4.Elements.Add(New Element("5", 8))
   s4.Elements.Add(New Element("6", 8))
   
   
   sc.Add(s2)
   sc.Add(s1)
   sc.Add(s4)
   sc.Add(s3)
   
   
   
   Return sc
End Function 'getData 
		</script>
	</HEAD>
	<BODY>
	<br>
		<DIV align="center">
			<dotnet:Chart id="Chart" runat="server" Width="568px" Height="344px">
			</dotnet:Chart>
		</DIV>
	</BODY>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -