form1.vb

visual basic课程设计案例精编

        Me.fraAngMode.ForeColor = System.Drawing.SystemColors.ControlText
        Me.fraAngMode.Location = New System.Drawing.Point(16, 120)
        Me.fraAngMode.Name = "fraAngMode"
        Me.fraAngMode.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.fraAngMode.Size = New System.Drawing.Size(81, 57)
        Me.fraAngMode.TabIndex = 22
        Me.fraAngMode.TabStop = False
        Me.fraAngMode.Text = "角度"
        '
        'RbtRadian
        '
        Me.RbtRadian.BackColor = System.Drawing.SystemColors.Control
        Me.RbtRadian.Cursor = System.Windows.Forms.Cursors.Default
        Me.RbtRadian.ForeColor = System.Drawing.SystemColors.ControlText
        Me.RbtRadian.Location = New System.Drawing.Point(8, 33)
        Me.RbtRadian.Name = "RbtRadian"
        Me.RbtRadian.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.RbtRadian.Size = New System.Drawing.Size(60, 17)
        Me.RbtRadian.TabIndex = 3
        Me.RbtRadian.TabStop = True
        Me.RbtRadian.Text = "弧度"
        '
        'RbtDegree
        '
        Me.RbtDegree.BackColor = System.Drawing.SystemColors.Control
        Me.RbtDegree.Checked = True
        Me.RbtDegree.Cursor = System.Windows.Forms.Cursors.Default
        Me.RbtDegree.ForeColor = System.Drawing.SystemColors.ControlText
        Me.RbtDegree.Location = New System.Drawing.Point(8, 16)
        Me.RbtDegree.Name = "RbtDegree"
        Me.RbtDegree.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.RbtDegree.Size = New System.Drawing.Size(60, 17)
        Me.RbtDegree.TabIndex = 2
        Me.RbtDegree.TabStop = True
        Me.RbtDegree.Text = "度数"
        '
        'txtAnswer
        '
        Me.txtAnswer.AcceptsReturn = True
        Me.txtAnswer.Anchor = System.Windows.Forms.AnchorStyles.None
        Me.txtAnswer.AutoSize = False
        Me.txtAnswer.BackColor = System.Drawing.SystemColors.Window
        Me.txtAnswer.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.txtAnswer.ForeColor = System.Drawing.SystemColors.WindowText
        Me.txtAnswer.Location = New System.Drawing.Point(8, 32)
        Me.txtAnswer.MaxLength = 0
        Me.txtAnswer.Multiline = True
        Me.txtAnswer.Name = "txtAnswer"
        Me.txtAnswer.ReadOnly = True
        Me.txtAnswer.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.txtAnswer.ScrollBars = System.Windows.Forms.ScrollBars.Vertical
        Me.txtAnswer.Size = New System.Drawing.Size(504, 75)
        Me.txtAnswer.TabIndex = 1
        Me.txtAnswer.Text = ""
        '
        'TabPage2
        '
        Me.TabPage2.Controls.Add(Me.TextDiv)
        Me.TabPage2.Controls.Add(Me.Label3)
        Me.TabPage2.Controls.Add(Me.TextMed)
        Me.TabPage2.Controls.Add(Me.TextMax)
        Me.TabPage2.Controls.Add(Me.BtClear)
        Me.TabPage2.Controls.Add(Me.TextVar)
        Me.TabPage2.Controls.Add(Me.TextSample)
        Me.TabPage2.Controls.Add(Me.TextSum2)
        Me.TabPage2.Controls.Add(Me.TextMod)
        Me.TabPage2.Controls.Add(Me.Label1)
        Me.TabPage2.Controls.Add(Me.Label2)
        Me.TabPage2.Controls.Add(Me.Label4)
        Me.TabPage2.Controls.Add(Me.BtAnalysis)
        Me.TabPage2.Controls.Add(Me.TextStVar)
        Me.TabPage2.Controls.Add(Me.TextSum)
        Me.TabPage2.Controls.Add(Me.Label24)
        Me.TabPage2.Controls.Add(Me.Label25)
        Me.TabPage2.Controls.Add(Me.Label26)
        Me.TabPage2.Controls.Add(Me.Label28)
        Me.TabPage2.Controls.Add(Me.Label29)
        Me.TabPage2.Controls.Add(Me.Label30)
        Me.TabPage2.Controls.Add(Me.TextMin)
        Me.TabPage2.Controls.Add(Me.TextMean)
        Me.TabPage2.Controls.Add(Me.Label32)
        Me.TabPage2.Controls.Add(Me.Label33)
        Me.TabPage2.Controls.Add(Me.GroupBox1)
        Me.TabPage2.Controls.Add(Me.TextStErr)
        Me.TabPage2.Location = New System.Drawing.Point(4, 21)
        Me.TabPage2.Name = "TabPage2"
        Me.TabPage2.Size = New System.Drawing.Size(544, 309)
        Me.TabPage2.TabIndex = 1
        Me.TabPage2.Text = "统计功能"
        '
        'TextDiv
        '
        Me.TextDiv.AcceptsReturn = True
        Me.TextDiv.AutoSize = False
        Me.TextDiv.BackColor = System.Drawing.SystemColors.Window
        Me.TextDiv.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.TextDiv.ForeColor = System.Drawing.SystemColors.WindowText
        Me.TextDiv.Location = New System.Drawing.Point(422, 272)
        Me.TextDiv.MaxLength = 0
        Me.TextDiv.Name = "TextDiv"
        Me.TextDiv.ReadOnly = True
        Me.TextDiv.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.TextDiv.Size = New System.Drawing.Size(114, 24)
        Me.TextDiv.TabIndex = 113
        Me.TextDiv.Text = ""
        '
        'Label3
        '
        Me.Label3.AutoSize = True
        Me.Label3.BackColor = System.Drawing.Color.Transparent
        Me.Label3.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label3.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label3.Location = New System.Drawing.Point(424, 248)
        Me.Label3.Name = "Label3"
        Me.Label3.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label3.Size = New System.Drawing.Size(35, 17)
        Me.Label3.TabIndex = 112
        Me.Label3.Text = "偏差:"
        '
        'TextMed
        '
        Me.TextMed.AcceptsReturn = True
        Me.TextMed.AutoSize = False
        Me.TextMed.BackColor = System.Drawing.SystemColors.Window
        Me.TextMed.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.TextMed.ForeColor = System.Drawing.SystemColors.WindowText
        Me.TextMed.Location = New System.Drawing.Point(286, 272)
        Me.TextMed.MaxLength = 0
        Me.TextMed.Name = "TextMed"
        Me.TextMed.ReadOnly = True
        Me.TextMed.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.TextMed.Size = New System.Drawing.Size(114, 23)
        Me.TextMed.TabIndex = 106
        Me.TextMed.Text = ""
        '
        'TextMax
        '
        Me.TextMax.AcceptsReturn = True
        Me.TextMax.AutoSize = False
        Me.TextMax.BackColor = System.Drawing.SystemColors.Window
        Me.TextMax.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.TextMax.ForeColor = System.Drawing.SystemColors.WindowText
        Me.TextMax.Location = New System.Drawing.Point(150, 272)
        Me.TextMax.MaxLength = 0
        Me.TextMax.Name = "TextMax"
        Me.TextMax.ReadOnly = True
        Me.TextMax.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.TextMax.Size = New System.Drawing.Size(114, 24)
        Me.TextMax.TabIndex = 107
        Me.TextMax.Text = ""
        '
        'BtClear
        '
        Me.BtClear.BackColor = System.Drawing.SystemColors.Control
        Me.BtClear.Cursor = System.Windows.Forms.Cursors.Default
        Me.BtClear.ForeColor = System.Drawing.SystemColors.ControlText
        Me.BtClear.Location = New System.Drawing.Point(296, 96)
        Me.BtClear.Name = "BtClear"
        Me.BtClear.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.BtClear.Size = New System.Drawing.Size(93, 28)
        Me.BtClear.TabIndex = 110
        Me.BtClear.Text = "清除"
        '
        'TextVar
        '
        Me.TextVar.AcceptsReturn = True
        Me.TextVar.AutoSize = False
        Me.TextVar.BackColor = System.Drawing.SystemColors.Window
        Me.TextVar.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.TextVar.ForeColor = System.Drawing.SystemColors.WindowText
        Me.TextVar.Location = New System.Drawing.Point(285, 216)
        Me.TextVar.MaxLength = 0
        Me.TextVar.Name = "TextVar"
        Me.TextVar.ReadOnly = True
        Me.TextVar.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.TextVar.Size = New System.Drawing.Size(114, 24)
        Me.TextVar.TabIndex = 101
        Me.TextVar.Text = ""
        '
        'TextSample
        '
        Me.TextSample.AcceptsReturn = True
        Me.TextSample.AutoSize = False
        Me.TextSample.BackColor = System.Drawing.SystemColors.Window
        Me.TextSample.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.TextSample.ForeColor = System.Drawing.SystemColors.WindowText
        Me.TextSample.Location = New System.Drawing.Point(18, 216)
        Me.TextSample.MaxLength = 0
        Me.TextSample.Name = "TextSample"
        Me.TextSample.ReadOnly = True
        Me.TextSample.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.TextSample.Size = New System.Drawing.Size(114, 24)
        Me.TextSample.TabIndex = 100
        Me.TextSample.Text = ""
        '
        'TextSum2
        '
        Me.TextSum2.AcceptsReturn = True
        Me.TextSum2.AutoSize = False
        Me.TextSum2.BackColor = System.Drawing.SystemColors.Window
        Me.TextSum2.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.TextSum2.ForeColor = System.Drawing.SystemColors.WindowText
        Me.TextSum2.Location = New System.Drawing.Point(418, 160)
        Me.TextSum2.MaxLength = 0
        Me.TextSum2.Name = "TextSum2"
        Me.TextSum2.ReadOnly = True
        Me.TextSum2.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.TextSum2.Size = New System.Drawing.Size(114, 23)
        Me.TextSum2.TabIndex = 99
        Me.TextSum2.Text = ""
        '
        'TextMod
        '
        Me.TextMod.AcceptsReturn = True
        Me.TextMod.AutoSize = False
        Me.TextMod.BackColor = System.Drawing.SystemColors.Window
        Me.TextMod.Cursor = System.Windows.Forms.Cursors.IBeam
        Me.TextMod.ForeColor = System.Drawing.SystemColors.WindowText
        Me.TextMod.Location = New System.Drawing.Point(152, 160)
        Me.TextMod.MaxLength = 0
        Me.TextMod.Name = "TextMod"
        Me.TextMod.ReadOnly = True
        Me.TextMod.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.TextMod.Size = New System.Drawing.Size(114, 23)
        Me.TextMod.TabIndex = 97
        Me.TextMod.Text = ""
        '
        'Label1
        '
        Me.Label1.AutoSize = True
        Me.Label1.BackColor = System.Drawing.Color.Transparent
        Me.Label1.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label1.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label1.Location = New System.Drawing.Point(16, 248)
        Me.Label1.Name = "Label1"
        Me.Label1.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label1.Size = New System.Drawing.Size(60, 17)
        Me.Label1.TabIndex = 109
        Me.Label1.Text = "标准误差:"
        '
        'Label2
        '
        Me.Label2.AutoSize = True
        Me.Label2.BackColor = System.Drawing.Color.Transparent
        Me.Label2.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label2.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label2.Location = New System.Drawing.Point(152, 136)
        Me.Label2.Name = "Label2"
        Me.Label2.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label2.Size = New System.Drawing.Size(23, 17)
        Me.Label2.TabIndex = 105
        Me.Label2.Text = "模:"
        '
        'Label4
        '
        Me.Label4.AutoSize = True
        Me.Label4.BackColor = System.Drawing.Color.Transparent
        Me.Label4.Cursor = System.Windows.Forms.Cursors.Default
        Me.Label4.ForeColor = System.Drawing.SystemColors.ControlText
        Me.Label4.Location = New System.Drawing.Point(416, 136)
        Me.Label4.Name = "Label4"
        Me.Label4.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Label4.Size = New System.Drawing.Size(42, 17)
        Me.Label4.TabIndex = 90
        Me.Label4.Text = "平方和"