objectcollection.aspx

来自「掌握学习.net开发的非常好的资料」· ASPX 代码 · 共 91 行

ASPX

91 行

<%@ Page Language="VB" debug="true" trace="false" Description="dotnetCHARTING Component"%>
<%@ Register TagPrefix="dotnet"  Namespace="dotnetCHARTING" Assembly="dotnetCHARTING"%>
<%@ Import Namespace="System.Drawing" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>

<script runat="server">
Sub Page_Load(sender As [Object], e As EventArgs)
   'set global properties
   Chart.Title = "Item sales report"
   
   ' Set the x axis label
   Chart.ChartArea.XAxis.Label.Text = "X Axis Label"
   
   ' Set the y axis label
   Chart.ChartArea.YAxis.Label.Text = "Y Axis Label"
   Chart.TempDirectory = "temp"
   Chart.Debug = True
   
   
   'Adding series programatically
   Chart.Series.Name = "Item sales"
   Chart.Series.DataFields = "xAxis=Name,yAxis=Total"
   Chart.Series.Data = CreateObjectCollection()
   Chart.SeriesCollection.Add()
End Sub 'Page_Load
 

Function CreateObjectCollection() As Products
   Dim myProducts As New Products()
   myProducts.Add(New Product("P1", 23))
   myProducts.Add(New Product("P2", 12))
   myProducts.Add(New Product("P3", 20))
   myProducts.Add(New Product("P4", 65))
   myProducts.Add(New Product("P5", 50))
   myProducts.Add(New Product("P6", 40))
   
   Return myProducts
End Function 'CreateObjectCollection
 _
Public Class Products
   Inherits System.Collections.CollectionBase
   
   Public Function Add(newProduct As Product) As Integer
      Return List.Add(newProduct)
   End Function 'Add 
End Class 'Products
 _

Public Class Product
   Private nameField As String
   Private totalField As Double
   
   Public Sub New()
   End Sub 'New
   
   Public Sub New(proName As String, proTotal As Double)
      nameField = proName
      totalField = proTotal
   End Sub 'New
   
   
   
   Public Property Name() As String
      Get
         Return nameField
      End Get
      Set
         nameField = value
      End Set
   End Property
   
   Public Property Total() As Double
      Get
         Return totalField
      End Get
      Set
         totalField = value
      End Set
   End Property
End Class 'Product 

</script>
<HTML><HEAD><TITLE>Custom collection Sample</TITLE></HEAD>
<BODY>
<DIV align=center>
 <dotnet:Chart id="Chart"  runat="server"/>
</DIV>
</BODY>
</BODY>
</HTML>

objectcollection.aspx - 源码说明

本页面展示了「掌握学习.net开发的非常好的资料」中的 objectcollection.aspx 源码文件，采用 ASPX 编程语言编写，共 91 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与.NET相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C

搜索代码Ctrl + F

全屏模式F11

增大字号Ctrl + =

减小字号Ctrl + -

显示快捷键?