打开“解决方案资源管理器(Solution Explorer)”，在“aspCharts项目”上点击右键，选择“添加(Add)”-“添加新项(Add New Item)”，弹出“添加新项(Add New Item)”对话框，在右边的“模板”里选择“Web 窗体”，在底下的名字输入框了输入“Chart.aspx”，点击“打开”按钮。
Imports System.Drawing Imports System.Drawing.Imaging Public Class Chart Inherits System.Web.UI.Page
#Region " Web 窗体设计器生成的代码 "
''''该调用是 Web 窗体设计器所必需的。 <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
End Sub
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init ''''CODEGEN: 此方法调用是 Web 窗体设计器所必需的 ''''不要使用代码编辑器修改它。 InitializeComponent() End Sub
#End Region
''''创建页面事件 Private Sub Page_Load(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MyBase.Load
''''声明整型变量i， Dim i As Integer
''''创建一个位图对象，用来放置柱形图，我们可以把它看作是一块画布。 ''''这里宽、高分别是400和200，当然，你也可以根据需要把它们做为参数来进行传递。 Dim objBitMap As New Bitmap(400, 200)
''''声明一个图形对象，在上面创建的位图上画图。 Dim objGraphics As Graphics
''''在画布（objBitMap对象）的坐标5，5处，用指定的Brush（画笔）对象和Font（字体）对象绘制统计图标题。 objGraphics.DrawString(" X 公司上半年销售情况", _ New Font("宋体", 16), Brushes.Black, New PointF(5, 5))
''''创建图例文字。 Dim symbolLeg As PointF = New PointF(335, 20) Dim descLeg As PointF = New PointF(360, 16)
''''画出图例。利用objGraphics图形对象的三个方法画出图例： ''''FillRectangle()方法画出填充矩形，DrawRectangle()方法画出矩形的边框， ''''DrawString()方法画出说明文字。这三个图形对象的方法在 .NET 框架类库类库中均已重载， ''''可以很方便根据不同的参数来画出图形。 For i = 0 To arrValueNames.Length - 1
注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！ 本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] 
