cspregression.designer.vb

来自「wrox出版社的另一套经典的VB2005数据库编程学习书籍,收集了书中源码,郑重」· VB 代码 · 共 756 行 · 第 1/3 页

		Me.lblIntercept.Name = "lblIntercept"
		Me.lblIntercept.Size = New System.Drawing.Size(68, 14)
		Me.lblIntercept.TabIndex = 42
		Me.lblIntercept.Text = "Intercept (a):"
		'
		'chkUseSalesOrders
		'
		Me.chkUseSalesOrders.AutoSize = True
		Me.chkUseSalesOrders.Location = New System.Drawing.Point(14, 70)
		Me.chkUseSalesOrders.Name = "chkUseSalesOrders"
		Me.chkUseSalesOrders.Size = New System.Drawing.Size(136, 17)
		Me.chkUseSalesOrders.TabIndex = 6
		Me.chkUseSalesOrders.Text = "Use &SalesOrders Tables"
		Me.ttRegr.SetToolTip(Me.chkUseSalesOrders, "Mark to use SalesOrders and SalesOrderItems tables (if present)")
		'
		'lstData
		'
		Me.lstData.Font = New System.Drawing.Font("Lucida Console", 9.5!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
		Me.lstData.FormattingEnabled = True
		Me.lstData.Location = New System.Drawing.Point(13, 100)
		Me.lstData.Name = "lstData"
		Me.lstData.Size = New System.Drawing.Size(568, 186)
		Me.lstData.TabIndex = 39
		Me.lstData.TabStop = False
		Me.ttRegr.SetToolTip(Me.lstData, "With regression statistics present, click to display a selected line; double-clic" & _
				"k to populate all statistics text boxes")
		'
		'cboMonths
		'
		Me.cboMonths.FormattingEnabled = True
		Me.cboMonths.Items.AddRange(New Object() {"3", "6", "9", "12", "15", "18", "24"})
		Me.cboMonths.Location = New System.Drawing.Point(306, 37)
		Me.cboMonths.Name = "cboMonths"
		Me.cboMonths.Size = New System.Drawing.Size(40, 21)
		Me.cboMonths.TabIndex = 2
		Me.ttRegr.SetToolTip(Me.cboMonths, "Select the number of months to analyze")
		'
		'btnGetData
		'
		Me.btnGetData.Location = New System.Drawing.Point(480, 37)
		Me.btnGetData.Name = "btnGetData"
		Me.btnGetData.Size = New System.Drawing.Size(101, 23)
		Me.btnGetData.TabIndex = 4
		Me.btnGetData.Text = "&Get Product Data"
		Me.ttRegr.SetToolTip(Me.btnGetData, "Click to display selected product sales for period and regression statistics")
		'
		'cboProduct
		'
		Me.cboProduct.DisplayMember = "ProductName"
		Me.cboProduct.FormattingEnabled = True
		Me.cboProduct.Location = New System.Drawing.Point(58, 38)
		Me.cboProduct.Margin = New System.Windows.Forms.Padding(2, 3, 3, 3)
		Me.cboProduct.Name = "cboProduct"
		Me.cboProduct.Size = New System.Drawing.Size(191, 21)
		Me.cboProduct.TabIndex = 0
		Me.ttRegr.SetToolTip(Me.cboProduct, "Select a product to display monthly sales data")
		Me.cboProduct.ValueMember = "ProductID"
		'
		'btnCSPClient
		'
		Me.btnCSPClient.Location = New System.Drawing.Point(255, 409)
		Me.btnCSPClient.Name = "btnCSPClient"
		Me.btnCSPClient.Size = New System.Drawing.Size(138, 23)
		Me.btnCSPClient.TabIndex = 7
		Me.btnCSPClient.Text = "Return to StartUp Form"
		'
		'txtStartDate
		'
		Me.txtStartDate.Location = New System.Drawing.Point(225, 70)
		Me.txtStartDate.Margin = New System.Windows.Forms.Padding(1, 3, 3, 3)
		Me.txtStartDate.Name = "txtStartDate"
		Me.txtStartDate.ReadOnly = True
		Me.txtStartDate.Size = New System.Drawing.Size(69, 20)
		Me.txtStartDate.TabIndex = 58
		Me.txtStartDate.TabStop = False
		Me.txtStartDate.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
		Me.ttRegr.SetToolTip(Me.txtStartDate, "Starting date of analysis ")
		'
		'lblStartDate
		'
		Me.lblStartDate.AutoSize = True
		Me.lblStartDate.Location = New System.Drawing.Point(167, 73)
		Me.lblStartDate.Margin = New System.Windows.Forms.Padding(3, 3, 0, 3)
		Me.lblStartDate.Name = "lblStartDate"
		Me.lblStartDate.Size = New System.Drawing.Size(58, 14)
		Me.lblStartDate.TabIndex = 59
		Me.lblStartDate.Text = "Start Date:"
		'
		'txtEndDate
		'
		Me.txtEndDate.Location = New System.Drawing.Point(382, 70)
		Me.txtEndDate.Margin = New System.Windows.Forms.Padding(1, 3, 3, 3)
		Me.txtEndDate.Name = "txtEndDate"
		Me.txtEndDate.ReadOnly = True
		Me.txtEndDate.Size = New System.Drawing.Size(69, 20)
		Me.txtEndDate.TabIndex = 60
		Me.txtEndDate.TabStop = False
		Me.txtEndDate.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
		'
		'lblEndDate
		'
		Me.lblEndDate.AutoSize = True
		Me.lblEndDate.Location = New System.Drawing.Point(325, 73)
		Me.lblEndDate.Margin = New System.Windows.Forms.Padding(3, 3, 2, 3)
		Me.lblEndDate.Name = "lblEndDate"
		Me.lblEndDate.Size = New System.Drawing.Size(54, 14)
		Me.lblEndDate.TabIndex = 61
		Me.lblEndDate.Text = "End Date:"
		Me.ttRegr.SetToolTip(Me.lblEndDate, "Last day of month preceding last month with orders")
		'
		'txtConfidence
		'
		Me.txtConfidence.Location = New System.Drawing.Point(541, 325)
		Me.txtConfidence.Margin = New System.Windows.Forms.Padding(0, 3, 3, 3)
		Me.txtConfidence.Name = "txtConfidence"
		Me.txtConfidence.Size = New System.Drawing.Size(40, 20)
		Me.txtConfidence.TabIndex = 62
		Me.txtConfidence.TabStop = False
		Me.txtConfidence.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
		Me.ttRegr.SetToolTip(Me.txtConfidence, "Confidence interval (lookup from Significance)")
		'
		'lblHeader
		'
		Me.lblHeader.AutoSize = True
		Me.lblHeader.Font = New System.Drawing.Font("Verdana", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
		Me.lblHeader.Location = New System.Drawing.Point(13, 13)
		Me.lblHeader.Margin = New System.Windows.Forms.Padding(3, 3, 3, 1)
		Me.lblHeader.Name = "lblHeader"
		Me.lblHeader.Size = New System.Drawing.Size(457, 18)
		Me.lblHeader.TabIndex = 63
		Me.lblHeader.Text = "Linear Regression Analysis for Northwind Product Sales Forecasts"
		'
		'txtNextQuarterSales
		'
		Me.txtNextQuarterSales.Location = New System.Drawing.Point(389, 354)
		Me.txtNextQuarterSales.Margin = New System.Windows.Forms.Padding(1, 3, 3, 3)
		Me.txtNextQuarterSales.Name = "txtNextQuarterSales"
		Me.txtNextQuarterSales.Size = New System.Drawing.Size(62, 20)
		Me.txtNextQuarterSales.TabIndex = 69
		Me.txtNextQuarterSales.TabStop = False
		Me.txtNextQuarterSales.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
		Me.ttRegr.SetToolTip(Me.txtNextQuarterSales, "Projected sales (US$) for three months following End Date")
		'
		'lblNextQuarterSales
		'
		Me.lblNextQuarterSales.AutoSize = True
		Me.lblNextQuarterSales.Location = New System.Drawing.Point(313, 357)
		Me.lblNextQuarterSales.Margin = New System.Windows.Forms.Padding(3, 3, 2, 3)
		Me.lblNextQuarterSales.Name = "lblNextQuarterSales"
		Me.lblNextQuarterSales.Size = New System.Drawing.Size(77, 14)
		Me.lblNextQuarterSales.TabIndex = 68
		Me.lblNextQuarterSales.Text = "Three Months:"
		'
		'txtNextMonthSales
		'
		Me.txtNextMonthSales.Location = New System.Drawing.Point(240, 354)
		Me.txtNextMonthSales.Margin = New System.Windows.Forms.Padding(0, 3, 3, 3)
		Me.txtNextMonthSales.Name = "txtNextMonthSales"
		Me.txtNextMonthSales.Size = New System.Drawing.Size(62, 20)
		Me.txtNextMonthSales.TabIndex = 67
		Me.txtNextMonthSales.TabStop = False
		Me.txtNextMonthSales.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
		Me.ttRegr.SetToolTip(Me.txtNextMonthSales, "Projected sales (US$) for month following End Date")
		'
		'lblNextMonthSales
		'
		Me.lblNextMonthSales.AutoSize = True
		Me.lblNextMonthSales.Location = New System.Drawing.Point(176, 357)
		Me.lblNextMonthSales.Margin = New System.Windows.Forms.Padding(2, 3, 1, 3)
		Me.lblNextMonthSales.Name = "lblNextMonthSales"
		Me.lblNextMonthSales.Size = New System.Drawing.Size(63, 14)
		Me.lblNextMonthSales.TabIndex = 66
		Me.lblNextMonthSales.Text = "This Month:"
		'
		'txtAverageSales
		'
		Me.txtAverageSales.Location = New System.Drawing.Point(89, 354)
		Me.txtAverageSales.Margin = New System.Windows.Forms.Padding(1, 3, 2, 3)
		Me.txtAverageSales.Name = "txtAverageSales"
		Me.txtAverageSales.Size = New System.Drawing.Size(76, 20)
		Me.txtAverageSales.TabIndex = 65
		Me.txtAverageSales.TabStop = False
		Me.txtAverageSales.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
		Me.ttRegr.SetToolTip(Me.txtAverageSales, "Average montly sales (US$)")
		'
		'lblAverageSales
		'
		Me.lblAverageSales.AutoSize = True
		Me.lblAverageSales.Location = New System.Drawing.Point(8, 357)
		Me.lblAverageSales.Margin = New System.Windows.Forms.Padding(3, 3, 1, 3)
		Me.lblAverageSales.Name = "lblAverageSales"
		Me.lblAverageSales.Size = New System.Drawing.Size(81, 14)
		Me.lblAverageSales.TabIndex = 64
		Me.lblAverageSales.Text = "Average Sales:"
		'
		'btnAllProducts
		'
		Me.btnAllProducts.Location = New System.Drawing.Point(480, 68)
		Me.btnAllProducts.Name = "btnAllProducts"
		Me.btnAllProducts.Size = New System.Drawing.Size(101, 23)
		Me.btnAllProducts.TabIndex = 5
		Me.btnAllProducts.Text = "&All Products Stats"
		Me.ttRegr.SetToolTip(Me.btnAllProducts, "Click to display regression statistics for all products")
		'
		'txtGetRegression
		'
		Me.txtGetRegression.Location = New System.Drawing.Point(240, 382)
		Me.txtGetRegression.Margin = New System.Windows.Forms.Padding(0, 3, 3, 3)
		Me.txtGetRegression.Name = "txtGetRegression"
		Me.txtGetRegression.Size = New System.Drawing.Size(47, 20)
		Me.txtGetRegression.TabIndex = 74
		Me.txtGetRegression.TabStop = False
		Me.txtGetRegression.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
		Me.ttRegr.SetToolTip(Me.txtGetRegression, "Time (seconds) to get regression statistics (only)")
		'
		'lblGetRegression
		'
		Me.lblGetRegression.AutoSize = True
		Me.lblGetRegression.Location = New System.Drawing.Point(158, 385)
		Me.lblGetRegression.Margin = New System.Windows.Forms.Padding(2, 3, 1, 3)
		Me.lblGetRegression.Name = "lblGetRegression"
		Me.lblGetRegression.Size = New System.Drawing.Size(85, 14)
		Me.lblGetRegression.TabIndex = 73
		Me.lblGetRegression.Text = "Get Regr. Time:"
		'
		'txtGetData
		'
		Me.txtGetData.Location = New System.Drawing.Point(89, 382)
		Me.txtGetData.Margin = New System.Windows.Forms.Padding(1, 3, 2, 3)
		Me.txtGetData.Name = "txtGetData"
		Me.txtGetData.Size = New System.Drawing.Size(50, 20)
		Me.txtGetData.TabIndex = 72
		Me.txtGetData.TabStop = False
		Me.txtGetData.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
		Me.ttRegr.SetToolTip(Me.txtGetData, "Time (seconds) to retrieve product data for period")
		'
		'lblGetData
		'
		Me.lblGetData.AutoSize = True
		Me.lblGetData.Location = New System.Drawing.Point(8, 385)
		Me.lblGetData.Margin = New System.Windows.Forms.Padding(3, 3, 1, 3)
		Me.lblGetData.Name = "lblGetData"
		Me.lblGetData.Size = New System.Drawing.Size(81, 14)
		Me.lblGetData.TabIndex = 71
		Me.lblGetData.Text = "Get Data Time:"
		'
		'txtRecords
		'
		Me.txtRecords.AcceptsReturn = True
		Me.txtRecords.Location = New System.Drawing.Point(390, 382)
		Me.txtRecords.Margin = New System.Windows.Forms.Padding(1, 3, 3, 3)
		Me.txtRecords.Name = "txtRecords"