_ Partial Class GanttChartUserControl Inherits System.Windows.Forms.UserControl 'UserControl overrides dispose to clean up the component list. _ Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Required by the Windows Form Designer Private components As System.ComponentModel.IContainer 'NOTE: The following procedure is required by the Windows Form Designer 'It can be modified using the Windows Form Designer. 'Do not modify it using the code editor. _ Private Sub InitializeComponent() Dim GanttDiagram1 As DevExpress.XtraCharts.GanttDiagram = New DevExpress.XtraCharts.GanttDiagram() Dim Series1 As DevExpress.XtraCharts.Series = New DevExpress.XtraCharts.Series() Dim RangeBarSeriesLabel1 As DevExpress.XtraCharts.RangeBarSeriesLabel = New DevExpress.XtraCharts.RangeBarSeriesLabel() Dim OverlappedGanttSeriesView1 As DevExpress.XtraCharts.OverlappedGanttSeriesView = New DevExpress.XtraCharts.OverlappedGanttSeriesView() Dim Series2 As DevExpress.XtraCharts.Series = New DevExpress.XtraCharts.Series() Dim RangeBarSeriesLabel2 As DevExpress.XtraCharts.RangeBarSeriesLabel = New DevExpress.XtraCharts.RangeBarSeriesLabel() Dim OverlappedGanttSeriesView2 As DevExpress.XtraCharts.OverlappedGanttSeriesView = New DevExpress.XtraCharts.OverlappedGanttSeriesView() Dim RangeBarSeriesLabel3 As DevExpress.XtraCharts.RangeBarSeriesLabel = New DevExpress.XtraCharts.RangeBarSeriesLabel() Dim OverlappedGanttSeriesView3 As DevExpress.XtraCharts.OverlappedGanttSeriesView = New DevExpress.XtraCharts.OverlappedGanttSeriesView() Me.ChartControl = New DevExpress.XtraCharts.ChartControl() CType(Me.ChartControl, System.ComponentModel.ISupportInitialize).BeginInit() CType(GanttDiagram1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Series1, System.ComponentModel.ISupportInitialize).BeginInit() CType(RangeBarSeriesLabel1, System.ComponentModel.ISupportInitialize).BeginInit() CType(OverlappedGanttSeriesView1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Series2, System.ComponentModel.ISupportInitialize).BeginInit() CType(RangeBarSeriesLabel2, System.ComponentModel.ISupportInitialize).BeginInit() CType(OverlappedGanttSeriesView2, System.ComponentModel.ISupportInitialize).BeginInit() CType(RangeBarSeriesLabel3, System.ComponentModel.ISupportInitialize).BeginInit() CType(OverlappedGanttSeriesView3, System.ComponentModel.ISupportInitialize).BeginInit() Me.SuspendLayout() ' 'ChartControl ' GanttDiagram1.AxisX.Range.ScrollingRange.SideMarginsEnabled = True GanttDiagram1.AxisX.Range.SideMarginsEnabled = True GanttDiagram1.AxisX.VisibleInPanesSerializable = "-1" GanttDiagram1.AxisY.Range.ScrollingRange.SideMarginsEnabled = True GanttDiagram1.AxisY.Range.SideMarginsEnabled = True GanttDiagram1.AxisY.VisibleInPanesSerializable = "-1" Me.ChartControl.Diagram = GanttDiagram1 Me.ChartControl.Dock = System.Windows.Forms.DockStyle.Fill Me.ChartControl.Location = New System.Drawing.Point(0, 0) Me.ChartControl.Name = "ChartControl" Series1.Label = RangeBarSeriesLabel1 Series1.Name = "Series 1" Series1.ValueScaleType = DevExpress.XtraCharts.ScaleType.DateTime Series1.View = OverlappedGanttSeriesView1 Series2.Label = RangeBarSeriesLabel2 Series2.Name = "Series 2" Series2.ValueScaleType = DevExpress.XtraCharts.ScaleType.DateTime Series2.View = OverlappedGanttSeriesView2 Me.ChartControl.SeriesSerializable = New DevExpress.XtraCharts.Series() {Series1, Series2} Me.ChartControl.SeriesTemplate.Label = RangeBarSeriesLabel3 Me.ChartControl.SeriesTemplate.View = OverlappedGanttSeriesView3 Me.ChartControl.Size = New System.Drawing.Size(484, 308) Me.ChartControl.TabIndex = 0 ' 'GanttChartUserControl ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.Controls.Add(Me.ChartControl) Me.Name = "GanttChartUserControl" Me.Size = New System.Drawing.Size(484, 308) CType(GanttDiagram1, System.ComponentModel.ISupportInitialize).EndInit() CType(RangeBarSeriesLabel1, System.ComponentModel.ISupportInitialize).EndInit() CType(OverlappedGanttSeriesView1, System.ComponentModel.ISupportInitialize).EndInit() CType(Series1, System.ComponentModel.ISupportInitialize).EndInit() CType(RangeBarSeriesLabel2, System.ComponentModel.ISupportInitialize).EndInit() CType(OverlappedGanttSeriesView2, System.ComponentModel.ISupportInitialize).EndInit() CType(Series2, System.ComponentModel.ISupportInitialize).EndInit() CType(RangeBarSeriesLabel3, System.ComponentModel.ISupportInitialize).EndInit() CType(OverlappedGanttSeriesView3, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.ChartControl, System.ComponentModel.ISupportInitialize).EndInit() Me.ResumeLayout(False) End Sub Friend WithEvents ChartControl As DevExpress.XtraCharts.ChartControl End Class