xchart.designer.vb

chart图片,统计,网上下来的源代码

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated(), ToolboxBitmap(GetType(XChart), "XChart.ToolboxBitmap")> Partial Class XChart
#Region "Windows 窗体设计器生成的代码 "
	<System.Diagnostics.DebuggerNonUserCode()> Public Sub New()
		MyBase.New()
		'此调用是 Windows 窗体设计器所必需的。
		InitializeComponent()
		UserControl_Initialize()
	End Sub
	'窗体重写释放，以清理组件列表。
	<System.Diagnostics.DebuggerNonUserCode()> Protected Overloads Overrides Sub Dispose(ByVal Disposing As Boolean)
		If Disposing Then
			If Not components Is Nothing Then
				components.Dispose()
			End If
		End If
		MyBase.Dispose(Disposing)
	End Sub
	'Windows 窗体设计器所必需的
	Private components As System.ComponentModel.IContainer
	Public ToolTip1 As System.Windows.Forms.ToolTip
	Friend WithEvents picToPrinterLegend As System.Windows.Forms.PictureBox
	Friend WithEvents picToPrinter As System.Windows.Forms.PictureBox
	Friend WithEvents lblInfo As System.Windows.Forms.Label
	Friend WithEvents mnuMainCustomItems As Microsoft.VisualBasic.Compatibility.VB6.ToolStripMenuItemArray
	Friend WithEvents mnuMainSaveAs As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents mnuMainPrint As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents mnuMainCopy As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents mnuSeparator1 As System.Windows.Forms.ToolStripSeparator
	Friend WithEvents mnuMainSelectionInfo As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents mnuMainViewLegend As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents mnuMainCustomItemsSeparator As System.Windows.Forms.ToolStripSeparator
	Friend WithEvents _mnuMainCustomItems_0 As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents _mnuMainCustomItems_1 As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents _mnuMainCustomItems_2 As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents _mnuMainCustomItems_3 As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents _mnuMainCustomItems_4 As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents _mnuMainCustomItems_5 As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents _mnuMainCustomItems_6 As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents _mnuMainCustomItems_7 As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents mnuMain As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents mnuLegendHide As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents mnuLegend As System.Windows.Forms.ToolStripMenuItem
	Friend WithEvents MainMenu1 As System.Windows.Forms.MenuStrip
	'注意: 以下过程是 Windows 窗体设计器所必需的
	'可以使用 Windows 窗体设计器来修改它。
	'不要使用代码编辑器修改它。
	<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
		Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(XChart))
		Me.components = New System.ComponentModel.Container()
		Me.ToolTip1 = New System.Windows.Forms.ToolTip(components)
		Me.picToPrinterLegend = New System.Windows.Forms.PictureBox
		Me.picToPrinter = New System.Windows.Forms.PictureBox
		Me.lblInfo = New System.Windows.Forms.Label
		Me.mnuMainCustomItems = New Microsoft.VisualBasic.Compatibility.VB6.ToolStripMenuItemArray(components)
		Me.MainMenu1 = New System.Windows.Forms.MenuStrip
		Me.mnuMain = New System.Windows.Forms.ToolStripMenuItem
		Me.mnuMainSaveAs = New System.Windows.Forms.ToolStripMenuItem
		Me.mnuMainPrint = New System.Windows.Forms.ToolStripMenuItem
		Me.mnuMainCopy = New System.Windows.Forms.ToolStripMenuItem
		Me.mnuSeparator1 = New System.Windows.Forms.ToolStripSeparator
		Me.mnuMainSelectionInfo = New System.Windows.Forms.ToolStripMenuItem
		Me.mnuMainViewLegend = New System.Windows.Forms.ToolStripMenuItem
		Me.mnuMainCustomItemsSeparator = New System.Windows.Forms.ToolStripSeparator
		Me._mnuMainCustomItems_0 = New System.Windows.Forms.ToolStripMenuItem
		Me._mnuMainCustomItems_1 = New System.Windows.Forms.ToolStripMenuItem
		Me._mnuMainCustomItems_2 = New System.Windows.Forms.ToolStripMenuItem
		Me._mnuMainCustomItems_3 = New System.Windows.Forms.ToolStripMenuItem
		Me._mnuMainCustomItems_4 = New System.Windows.Forms.ToolStripMenuItem
		Me._mnuMainCustomItems_5 = New System.Windows.Forms.ToolStripMenuItem
		Me._mnuMainCustomItems_6 = New System.Windows.Forms.ToolStripMenuItem
		Me._mnuMainCustomItems_7 = New System.Windows.Forms.ToolStripMenuItem
		Me.mnuLegend = New System.Windows.Forms.ToolStripMenuItem
		Me.mnuLegendHide = New System.Windows.Forms.ToolStripMenuItem
		Me.MainMenu1.SuspendLayout()
		Me.SuspendLayout()
		Me.ToolTip1.Active = True
		CType(Me.mnuMainCustomItems, System.ComponentModel.ISupportInitialize).BeginInit()
		Me.ClientSize = New System.Drawing.Size(560, 372)
		MyBase.Location = New System.Drawing.Point(0, 0)
		MyBase.Font = New System.Drawing.Font("Arial", 9!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
		MyBase.Name = "XChart"
		Me.picToPrinterLegend.BackColor = System.Drawing.SystemColors.Window
		Me.picToPrinterLegend.ForeColor = System.Drawing.SystemColors.WindowText
		Me.picToPrinterLegend.Size = New System.Drawing.Size(67, 37)
		Me.picToPrinterLegend.Location = New System.Drawing.Point(110, 148)
		Me.picToPrinterLegend.TabIndex = 2
		Me.picToPrinterLegend.Visible = False
		Me.picToPrinterLegend.Dock = System.Windows.Forms.DockStyle.None
		Me.picToPrinterLegend.CausesValidation = True
		Me.picToPrinterLegend.Enabled = True
		Me.picToPrinterLegend.Cursor = System.Windows.Forms.Cursors.Default
		Me.picToPrinterLegend.RightToLeft = System.Windows.Forms.RightToLeft.No
		Me.picToPrinterLegend.TabStop = True
		Me.picToPrinterLegend.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Normal
		Me.picToPrinterLegend.BorderStyle = System.Windows.Forms.BorderStyle.None
		Me.picToPrinterLegend.Name = "picToPrinterLegend"
		Me.picToPrinter.BackColor = System.Drawing.SystemColors.Window
		Me.picToPrinter.ForeColor = System.Drawing.SystemColors.WindowText
		Me.picToPrinter.Size = New System.Drawing.Size(67, 37)
		Me.picToPrinter.Location = New System.Drawing.Point(108, 104)
		Me.picToPrinter.TabIndex = 1
		Me.picToPrinter.Visible = False
		Me.picToPrinter.Dock = System.Windows.Forms.DockStyle.None
		Me.picToPrinter.CausesValidation = True
		Me.picToPrinter.Enabled = True
		Me.picToPrinter.Cursor = System.Windows.Forms.Cursors.Default
		Me.picToPrinter.RightToLeft = System.Windows.Forms.RightToLeft.No
		Me.picToPrinter.TabStop = True
		Me.picToPrinter.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Normal
		Me.picToPrinter.BorderStyle = System.Windows.Forms.BorderStyle.None
		Me.picToPrinter.Name = "picToPrinter"
		Me.lblInfo.BackColor = System.Drawing.Color.FromARGB(255, 255, 192)
		Me.lblInfo.ForeColor = System.Drawing.SystemColors.WindowText
		Me.lblInfo.Size = New System.Drawing.Size(70, 17)
		Me.lblInfo.Location = New System.Drawing.Point(7, 32)
		Me.lblInfo.TabIndex = 0
		Me.lblInfo.UseMnemonic = False
		Me.lblInfo.Visible = False
		Me.lblInfo.TextAlign = System.Drawing.ContentAlignment.TopLeft
		Me.lblInfo.Enabled = True
		Me.lblInfo.Cursor = System.Windows.Forms.Cursors.Default
		Me.lblInfo.RightToLeft = System.Windows.Forms.RightToLeft.No
		Me.lblInfo.AutoSize = False
		Me.lblInfo.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
		Me.lblInfo.Name = "lblInfo"
		Me.mnuMain.Name = "mnuMain"
		Me.mnuMain.Text = "&Main"
		Me.mnuMain.Visible = False
		Me.mnuMain.Checked = False
		Me.mnuMain.Enabled = True
		Me.mnuMainSaveAs.Name = "mnuMainSaveAs"
		Me.mnuMainSaveAs.Text = "Save As"
		Me.mnuMainSaveAs.Checked = False
		Me.mnuMainSaveAs.Enabled = True
		Me.mnuMainSaveAs.Visible = True
		Me.mnuMainPrint.Name = "mnuMainPrint"
		Me.mnuMainPrint.Text = "Print"
		Me.mnuMainPrint.Checked = False
		Me.mnuMainPrint.Enabled = True
		Me.mnuMainPrint.Visible = True
		Me.mnuMainCopy.Name = "mnuMainCopy"
		Me.mnuMainCopy.Text = "Copy"
		Me.mnuMainCopy.Checked = False
		Me.mnuMainCopy.Enabled = True
		Me.mnuMainCopy.Visible = True
		Me.mnuSeparator1.Enabled = True
		Me.mnuSeparator1.Visible = True
		Me.mnuSeparator1.Name = "mnuSeparator1"
		Me.mnuMainSelectionInfo.Name = "mnuMainSelectionInfo"
		Me.mnuMainSelectionInfo.Text = "Selection information"
		Me.mnuMainSelectionInfo.Checked = False
		Me.mnuMainSelectionInfo.Enabled = True
		Me.mnuMainSelectionInfo.Visible = True
		Me.mnuMainViewLegend.Name = "mnuMainViewLegend"
		Me.mnuMainViewLegend.Text = "Display Legend"
		Me.mnuMainViewLegend.Checked = False
		Me.mnuMainViewLegend.Enabled = True
		Me.mnuMainViewLegend.Visible = True
		Me.mnuMainCustomItemsSeparator.Visible = False
		Me.mnuMainCustomItemsSeparator.Enabled = True
		Me.mnuMainCustomItemsSeparator.Name = "mnuMainCustomItemsSeparator"
		Me._mnuMainCustomItems_0.Name = "_mnuMainCustomItems_0"
		Me._mnuMainCustomItems_0.Text = "1"
		Me._mnuMainCustomItems_0.Visible = False
		Me._mnuMainCustomItems_0.Checked = False
		Me._mnuMainCustomItems_0.Enabled = True
		Me._mnuMainCustomItems_1.Name = "_mnuMainCustomItems_1"
		Me._mnuMainCustomItems_1.Text = "2"
		Me._mnuMainCustomItems_1.Visible = False
		Me._mnuMainCustomItems_1.Checked = False
		Me._mnuMainCustomItems_1.Enabled = True
		Me._mnuMainCustomItems_2.Name = "_mnuMainCustomItems_2"
		Me._mnuMainCustomItems_2.Text = "3"
		Me._mnuMainCustomItems_2.Visible = False
		Me._mnuMainCustomItems_2.Checked = False
		Me._mnuMainCustomItems_2.Enabled = True
		Me._mnuMainCustomItems_3.Name = "_mnuMainCustomItems_3"
		Me._mnuMainCustomItems_3.Text = "4"
		Me._mnuMainCustomItems_3.Visible = False
		Me._mnuMainCustomItems_3.Checked = False
		Me._mnuMainCustomItems_3.Enabled = True
		Me._mnuMainCustomItems_4.Name = "_mnuMainCustomItems_4"
		Me._mnuMainCustomItems_4.Text = "5"
		Me._mnuMainCustomItems_4.Visible = False
		Me._mnuMainCustomItems_4.Checked = False
		Me._mnuMainCustomItems_4.Enabled = True
		Me._mnuMainCustomItems_5.Name = "_mnuMainCustomItems_5"
		Me._mnuMainCustomItems_5.Text = "6"
		Me._mnuMainCustomItems_5.Visible = False
		Me._mnuMainCustomItems_5.Checked = False
		Me._mnuMainCustomItems_5.Enabled = True
		Me._mnuMainCustomItems_6.Name = "_mnuMainCustomItems_6"
		Me._mnuMainCustomItems_6.Text = "7"
		Me._mnuMainCustomItems_6.Visible = False
		Me._mnuMainCustomItems_6.Checked = False
		Me._mnuMainCustomItems_6.Enabled = True
		Me._mnuMainCustomItems_7.Name = "_mnuMainCustomItems_7"
		Me._mnuMainCustomItems_7.Text = "8"
		Me._mnuMainCustomItems_7.Visible = False
		Me._mnuMainCustomItems_7.Checked = False
		Me._mnuMainCustomItems_7.Enabled = True
		Me.mnuLegend.Name = "mnuLegend"
		Me.mnuLegend.Text = "&Legend"
		Me.mnuLegend.Checked = False
		Me.mnuLegend.Enabled = True
		Me.mnuLegend.Visible = True
		Me.mnuLegendHide.Name = "mnuLegendHide"
		Me.mnuLegendHide.Text = "Hide"
		Me.mnuLegendHide.Checked = False
		Me.mnuLegendHide.Enabled = True
		Me.mnuLegendHide.Visible = True
		Me.Controls.Add(picToPrinterLegend)
		Me.Controls.Add(picToPrinter)
		Me.Controls.Add(lblInfo)
		Me.mnuMainCustomItems.SetIndex(_mnuMainCustomItems_0, CType(0, Short))
		Me.mnuMainCustomItems.SetIndex(_mnuMainCustomItems_1, CType(1, Short))
		Me.mnuMainCustomItems.SetIndex(_mnuMainCustomItems_2, CType(2, Short))
		Me.mnuMainCustomItems.SetIndex(_mnuMainCustomItems_3, CType(3, Short))
		Me.mnuMainCustomItems.SetIndex(_mnuMainCustomItems_4, CType(4, Short))
		Me.mnuMainCustomItems.SetIndex(_mnuMainCustomItems_5, CType(5, Short))
		Me.mnuMainCustomItems.SetIndex(_mnuMainCustomItems_6, CType(6, Short))
		Me.mnuMainCustomItems.SetIndex(_mnuMainCustomItems_7, CType(7, Short))
		CType(Me.mnuMainCustomItems, System.ComponentModel.ISupportInitialize).EndInit()
		Me.MainMenu1.ResumeLayout(False)
		Me.ResumeLayout(False)
		Me.PerformLayout()
	End Sub
#End Region 
#Region "Upgrade Support"
	<System.Runtime.InteropServices.ProgId("MouseUpEventArgs_NET.MouseUpEventArgs")> Public NotInheritable Class MouseUpEventArgs
		Inherits System.EventArgs
		Public Button As Short
		Public Shift As Short
		Public X As Single
		Public Y As Single
		Public Sub New(ByRef Button As Short, ByRef Shift As Short, ByRef X As Single, ByRef Y As Single)
			MyBase.New()
			Me.Button = Button
			Me.Shift = Shift
			Me.X = X
			Me.Y = Y
		End Sub
	End Class
	<System.Runtime.InteropServices.ProgId("MouseDownEventArgs_NET.MouseDownEventArgs")> Public NotInheritable Class MouseDownEventArgs
		Inherits System.EventArgs
		Public Button As Short
		Public Shift As Short
		Public X As Single
		Public Y As Single
		Public Sub New(ByRef Button As Short, ByRef Shift As Short, ByRef X As Single, ByRef Y As Single)
			MyBase.New()
			Me.Button = Button
			Me.Shift = Shift
			Me.X = X
			Me.Y = Y
		End Sub
	End Class
	<System.Runtime.InteropServices.ProgId("MenuItemClickEventArgs_NET.MenuItemClickEventArgs")> Public NotInheritable Class MenuItemClickEventArgs
		Inherits System.EventArgs
		Public intMenuItemIndex As Short
		Public stgMenuItemCaption As String
		Public Sub New(ByRef intMenuItemIndex As Short, ByRef stgMenuItemCaption As String)
			MyBase.New()
			Me.intMenuItemIndex = intMenuItemIndex
			Me.stgMenuItemCaption = stgMenuItemCaption
		End Sub
	End Class
	<System.Runtime.InteropServices.ProgId("ItemClickEventArgs_NET.ItemClickEventArgs")> Public NotInheritable Class ItemClickEventArgs
		Inherits System.EventArgs
		Public cItem As ChartItem
		Public Sub New(ByRef cItem As ChartItem)
			MyBase.New()
			Me.cItem = cItem
		End Sub
	End Class
#End Region 
End Class