form1.vb

项目是为日本瑞萨工作所做的BAKE炉温控系统 整个文件夹包括设计文档

        Me.TabPage4.Controls.Add(Me.ComboBox4)
        Me.TabPage4.Controls.Add(Me.Label26)
        Me.TabPage4.Controls.Add(Me.DataGrid1)
        Me.TabPage4.Controls.Add(Me.Label25)
        Me.TabPage4.Controls.Add(Me.Label24)
        Me.TabPage4.Controls.Add(Me.SearchBut)
        Me.TabPage4.Controls.Add(Me.OutBut)
        Me.TabPage4.Location = New System.Drawing.Point(4, 28)
        Me.TabPage4.Name = "TabPage4"
        Me.TabPage4.Size = New System.Drawing.Size(1032, 560)
        Me.TabPage4.TabIndex = 3
        Me.TabPage4.Text = "查询"
        '
        'DateTimePicker2
        '
        Me.DateTimePicker2.CalendarForeColor = System.Drawing.Color.Green
        Me.DateTimePicker2.CalendarTitleBackColor = System.Drawing.Color.FromArgb(CType(255, Byte), CType(192, Byte), CType(192, Byte))
        Me.DateTimePicker2.Format = System.Windows.Forms.DateTimePickerFormat.Short
        Me.DateTimePicker2.Location = New System.Drawing.Point(104, 240)
        Me.DateTimePicker2.Name = "DateTimePicker2"
        Me.DateTimePicker2.Size = New System.Drawing.Size(160, 29)
        Me.DateTimePicker2.TabIndex = 21
        '
        'DateTimePicker1
        '
        Me.DateTimePicker1.CalendarForeColor = System.Drawing.Color.Green
        Me.DateTimePicker1.CalendarTitleBackColor = System.Drawing.Color.FromArgb(CType(255, Byte), CType(192, Byte), CType(192, Byte))
        Me.DateTimePicker1.Format = System.Windows.Forms.DateTimePickerFormat.Short
        Me.DateTimePicker1.Location = New System.Drawing.Point(104, 152)
        Me.DateTimePicker1.Name = "DateTimePicker1"
        Me.DateTimePicker1.Size = New System.Drawing.Size(160, 29)
        Me.DateTimePicker1.TabIndex = 20
        '
        'ComboBox4
        '
        Me.ComboBox4.Items.AddRange(New Object() {"1＃", "2＃", "3＃", "4＃"})
        Me.ComboBox4.Location = New System.Drawing.Point(176, 64)
        Me.ComboBox4.Name = "ComboBox4"
        Me.ComboBox4.Size = New System.Drawing.Size(88, 27)
        Me.ComboBox4.TabIndex = 10
        '
        'Label26
        '
        Me.Label26.ForeColor = System.Drawing.Color.Green
        Me.Label26.Location = New System.Drawing.Point(8, 64)
        Me.Label26.Name = "Label26"
        Me.Label26.Size = New System.Drawing.Size(168, 23)
        Me.Label26.TabIndex = 9
        Me.Label26.Text = "请选择Bake炉号："
        '
        'DataGrid1
        '
        Me.DataGrid1.BackgroundColor = System.Drawing.Color.White
        Me.DataGrid1.CaptionBackColor = System.Drawing.Color.FromArgb(CType(255, Byte), CType(255, Byte), CType(192, Byte))
        Me.DataGrid1.DataMember = ""
        Me.DataGrid1.HeaderForeColor = System.Drawing.SystemColors.ControlText
        Me.DataGrid1.Location = New System.Drawing.Point(272, 0)
        Me.DataGrid1.Name = "DataGrid1"
        Me.DataGrid1.Size = New System.Drawing.Size(736, 560)
        Me.DataGrid1.TabIndex = 7
        Me.DataGrid1.Visible = False
        '
        'Label25
        '
        Me.Label25.ForeColor = System.Drawing.Color.Green
        Me.Label25.Location = New System.Drawing.Point(8, 208)
        Me.Label25.Name = "Label25"
        Me.Label25.Size = New System.Drawing.Size(160, 23)
        Me.Label25.TabIndex = 6
        Me.Label25.Text = "查询 结束时间："
        '
        'Label24
        '
        Me.Label24.ForeColor = System.Drawing.Color.Green
        Me.Label24.Location = New System.Drawing.Point(8, 120)
        Me.Label24.Name = "Label24"
        Me.Label24.Size = New System.Drawing.Size(160, 24)
        Me.Label24.TabIndex = 5
        Me.Label24.Text = "查询 开始时间："
        '
        'SearchBut
        '
        Me.SearchBut.ForeColor = System.Drawing.Color.FromArgb(CType(0, Byte), CType(192, Byte), CType(192, Byte))
        Me.SearchBut.Location = New System.Drawing.Point(32, 328)
        Me.SearchBut.Name = "SearchBut"
        Me.SearchBut.Size = New System.Drawing.Size(88, 40)
        Me.SearchBut.TabIndex = 1
        Me.SearchBut.Text = "查询"
        '
        'OutBut
        '
        Me.OutBut.ForeColor = System.Drawing.Color.FromArgb(CType(0, Byte), CType(192, Byte), CType(192, Byte))
        Me.OutBut.Location = New System.Drawing.Point(32, 400)
        Me.OutBut.Name = "OutBut"
        Me.OutBut.Size = New System.Drawing.Size(88, 40)
        Me.OutBut.TabIndex = 0
        Me.OutBut.Text = "导出"
        '
        'TabPage2
        '
        Me.TabPage2.BackColor = System.Drawing.Color.FromArgb(CType(255, Byte), CType(224, Byte), CType(192, Byte))
        Me.TabPage2.Controls.Add(Me.Label23)
        Me.TabPage2.Controls.Add(Me.ComboBox1)
        Me.TabPage2.Controls.Add(Me.Label19)
        Me.TabPage2.Controls.Add(Me.AdjTxt)
        Me.TabPage2.Controls.Add(Me.Label18)
        Me.TabPage2.Location = New System.Drawing.Point(4, 28)
        Me.TabPage2.Name = "TabPage2"
        Me.TabPage2.Size = New System.Drawing.Size(1032, 560)
        Me.TabPage2.TabIndex = 1
        Me.TabPage2.Text = "校准"
        '
        'Label23
        '
        Me.Label23.ForeColor = System.Drawing.Color.Maroon
        Me.Label23.Location = New System.Drawing.Point(496, 216)
        Me.Label23.Name = "Label23"
        Me.Label23.Size = New System.Drawing.Size(112, 40)
        Me.Label23.TabIndex = 4
        Me.Label23.Text = "按回车键确定此次输入"
        '
        'ComboBox1
        '
        Me.ComboBox1.Items.AddRange(New Object() {"1＃", "2＃", "3＃", "4＃"})
        Me.ComboBox1.Location = New System.Drawing.Point(288, 128)
        Me.ComboBox1.Name = "ComboBox1"
        Me.ComboBox1.Size = New System.Drawing.Size(136, 27)
        Me.ComboBox1.TabIndex = 3
        '
        'Label19
        '
        Me.Label19.ForeColor = System.Drawing.Color.Green
        Me.Label19.Location = New System.Drawing.Point(80, 128)
        Me.Label19.Name = "Label19"
        Me.Label19.Size = New System.Drawing.Size(208, 24)
        Me.Label19.TabIndex = 2
        Me.Label19.Text = "请选择校准Bake炉号："
        '
        'AdjTxt
        '
        Me.AdjTxt.Location = New System.Drawing.Point(288, 224)
        Me.AdjTxt.Name = "AdjTxt"
        Me.AdjTxt.Size = New System.Drawing.Size(144, 29)
        Me.AdjTxt.TabIndex = 1
        Me.AdjTxt.Text = ""
        '
        'Label18
        '
        Me.Label18.Font = New System.Drawing.Font("楷体_GB2312", 14.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.Label18.ForeColor = System.Drawing.Color.Green
        Me.Label18.Location = New System.Drawing.Point(128, 232)
        Me.Label18.Name = "Label18"
        Me.Label18.Size = New System.Drawing.Size(168, 24)
        Me.Label18.TabIndex = 0
        Me.Label18.Text = "请输入校准温度："
        '
        'TabPage3
        '
        Me.TabPage3.BackColor = System.Drawing.Color.FromArgb(CType(255, Byte), CType(224, Byte), CType(192, Byte))
        Me.TabPage3.Controls.Add(Me.ComboBox3)
        Me.TabPage3.Controls.Add(Me.Label21)
        Me.TabPage3.Controls.Add(Me.ComboBox2)
        Me.TabPage3.Controls.Add(Me.Label20)
        Me.TabPage3.Location = New System.Drawing.Point(4, 28)
        Me.TabPage3.Name = "TabPage3"
        Me.TabPage3.Size = New System.Drawing.Size(1032, 560)
        Me.TabPage3.TabIndex = 2
        Me.TabPage3.Text = "修改"
        '
        'ComboBox3
        '
        Me.ComboBox3.Items.AddRange(New Object() {"1＃", "2＃", "3＃", "4＃"})
        Me.ComboBox3.Location = New System.Drawing.Point(280, 208)
        Me.ComboBox3.Name = "ComboBox3"
        Me.ComboBox3.Size = New System.Drawing.Size(168, 27)
        Me.ComboBox3.TabIndex = 3
        '
        'Label21
        '
        Me.Label21.ForeColor = System.Drawing.Color.Green
        Me.Label21.Location = New System.Drawing.Point(80, 216)
        Me.Label21.Name = "Label21"
        Me.Label21.Size = New System.Drawing.Size(208, 24)
        Me.Label21.TabIndex = 2
        Me.Label21.Text = "请选择修改Bake炉号："
        '
        'ComboBox2
        '
        Me.ComboBox2.Items.AddRange(New Object() {"1＃", "2＃", "3＃", "4＃"})
        Me.ComboBox2.Location = New System.Drawing.Point(280, 112)
        Me.ComboBox2.Name = "ComboBox2"
        Me.ComboBox2.Size = New System.Drawing.Size(168, 27)
        Me.ComboBox2.TabIndex = 1
        '
        'Label20
        '
        Me.Label20.ForeColor = System.Drawing.Color.Green
        Me.Label20.Location = New System.Drawing.Point(96, 112)
        Me.Label20.Name = "Label20"
        Me.Label20.Size = New System.Drawing.Size(184, 24)
        Me.Label20.TabIndex = 0
        Me.Label20.Text = "请选择原Bake炉号："
        '
        'TabPage5
        '
        Me.TabPage5.Controls.Add(Me.Button6)
        Me.TabPage5.Controls.Add(Me.GroupBox5)
        Me.TabPage5.Controls.Add(Me.Button5)
        Me.TabPage5.Controls.Add(Me.GroupBox4)
        Me.TabPage5.Controls.Add(Me.btnWrite)
        Me.TabPage5.Controls.Add(Me.btnRevise)
        Me.TabPage5.Controls.Add(Me.txt)
        Me.TabPage5.Controls.Add(Me.GroupBox3)
        Me.TabPage5.Controls.Add(Me.PictureBox5)
        Me.TabPage5.Controls.Add(Me.GroupBox2)
        Me.TabPage5.Controls.Add(Me.GroupBox1)
        Me.TabPage5.Location = New System.Drawing.Point(4, 28)
        Me.TabPage5.Name = "TabPage5"
        Me.TabPage5.Size = New System.Drawing.Size(1032, 560)
        Me.TabPage5.TabIndex = 4
        Me.TabPage5.Text = "回归"
        '
        'Button6
        '
        Me.Button6.ForeColor = System.Drawing.Color.FromArgb(CType(0, Byte), CType(192, Byte), CType(192, Byte))
        Me.Button6.Location = New System.Drawing.Point(824, 312)
        Me.Button6.Name = "Button6"
        Me.Button6.Size = New System.Drawing.Size(96, 40)
        Me.Button6.TabIndex = 12
        Me.Button6.Text = "清空"
        '
        'GroupBox5
        '
        Me.GroupBox5.Controls.Add(Me.TxtRead)
        Me.GroupBox5.ForeColor = System.Drawing.Color.Green
        Me.GroupBox5.Location = New System.Drawing.Point(512, 368)
        Me.GroupBox5.Name = "GroupBox5"
        Me.GroupBox5.Size = New System.Drawing.Size(480, 176)
        Me.GroupBox5.TabIndex = 11
        Me.GroupBox5.TabStop = False
        Me.GroupBox5.Text = "读回的数据"
        '
        'TxtRead
        '
        Me.TxtRead.Font = New System.Drawing.Font("宋体", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.TxtRead.Location = New System.Drawing.Point(24, 40)
        Me.TxtRead.Multiline = True
        Me.TxtRead.Name = "TxtRead"
        Me.TxtRead.Size = New System.Drawing.Size(432, 120)
        Me.TxtRead.TabIndex = 8
        Me.TxtRead.Text = ""
        '
        'Button5
        '
        Me.Button5.Font = New System.Drawing.Font("楷体_GB2312", 15.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.Button5.ForeColor = System.Drawing.Color.FromArgb(CType(0, Byte), CType(192, Byte), CType(192, Byte))
        Me.Button5.Location = New System.Drawing.Point(536, 312)
        Me.Button5.Name = "Button5"
        Me.Button5.Size = New System.Drawing.Size(96, 40)
        Me.Button5.TabIndex = 10
        Me.Button5.Text = "刷新"
        '
        'GroupBox4
        '
        Me.GroupBox4.Controls.Add(Me.txtWrite)
        Me.GroupBox4.ForeColor = System.Drawing.Color.Green
        Me.GroupBox4.Location = New System.Drawing.Point(8, 368)
        Me.GroupBox4.Name = "GroupBox4"
        Me.GroupBox4.Size = New System.Drawing.Size(480, 176)
        Me.GroupBox4.TabIndex = 9
        Me.GroupBox4.TabStop = False
        Me.GroupBox4.Text = "写入的数据"
        '
        'txtWrite
        '
        Me.txtWrite.Font = New System.Drawing.Font("宋体", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtWrite.Location = New System.Drawing.Point(16, 40)
        Me.txtWrite.Multiline = True
        Me.txtWrite.Name = "txtWrite"
        Me.txtWrite.Size = New System.Drawing.Size(448, 120)
        Me.txtWrite.TabIndex = 8
        Me.txtWrite.Text = ""
        '
        'btnWrite
        '
        Me.btnWrite.ForeColor = System.Drawing.Color.FromArgb(CType(0, Byte), CType(192, Byte), CType(192, Byte))
        Me.btnWrite.Location = New System.Drawing.Point(728, 312)
        Me.btnWrite.Name = "btnWrite"
        Me.btnWrite.Size = New System.Drawing.Size(96, 40)
        Me.btnWrite.TabIndex = 8
        Me.btnWrite.Text = "写入"
        '
        'btnRevise
        '
        Me.btnRevise.Font = New System.Drawing.Font("楷体_GB2312", 15.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134, Byte))