form1.vb

应急系统(Emergency System, ES)主要是针对自然灾害,安全事故

        Me.Txtapplycompanyphone = New System.Windows.Forms.TextBox()
        Me.Txtmodifytime = New System.Windows.Forms.TextBox()
        Me.Txtmodifycompany = New System.Windows.Forms.TextBox()
        Me.Txtmodifycompanyphone = New System.Windows.Forms.TextBox()
        Me.Cbaccidenttype = New System.Windows.Forms.ComboBox()
        Me.GroupBox1 = New System.Windows.Forms.GroupBox()
        Me.Txtadditional = New System.Windows.Forms.TextBox()
        Me.GroupBox2 = New System.Windows.Forms.GroupBox()
        Me.Btseeall = New System.Windows.Forms.Button()
        Me.Btlastrecord = New System.Windows.Forms.Button()
        Me.Btnextrecord = New System.Windows.Forms.Button()
        Me.Btfrontrecord = New System.Windows.Forms.Button()
        Me.Btfirstrecord = New System.Windows.Forms.Button()
        Me.GroupBox3 = New System.Windows.Forms.GroupBox()
        Me.Btexit = New System.Windows.Forms.Button()
        Me.Btreturndata = New System.Windows.Forms.Button()
        Me.Btdeleterecord = New System.Windows.Forms.Button()
        Me.Btmodifyrecord = New System.Windows.Forms.Button()
        Me.OleDbDataAdapter1 = New System.Data.OleDb.OleDbDataAdapter()
        Me.OleDbDeleteCommand1 = New System.Data.OleDb.OleDbCommand()
        Me.OleDbConnection1 = New System.Data.OleDb.OleDbConnection()
        Me.OleDbInsertCommand1 = New System.Data.OleDb.OleDbCommand()
        Me.OleDbSelectCommand1 = New System.Data.OleDb.OleDbCommand()
        Me.OleDbUpdateCommand1 = New System.Data.OleDb.OleDbCommand()
        Me.Lbposition = New System.Windows.Forms.Label()
        CType(Me.DataSet21, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.GroupBox1.SuspendLayout()
        Me.GroupBox2.SuspendLayout()
        Me.GroupBox3.SuspendLayout()
        Me.SuspendLayout()
        '
        'Label1
        '
        Me.Label1.Location = New System.Drawing.Point(16, 24)
        Me.Label1.Name = "Label1"
        Me.Label1.TabIndex = 0
        Me.Label1.Text = "编号："
        '
        'Label2
        '
        Me.Label2.Location = New System.Drawing.Point(16, 64)
        Me.Label2.Name = "Label2"
        Me.Label2.TabIndex = 1
        Me.Label2.Text = "突发事件名称："
        '
        'Label3
        '
        Me.Label3.Location = New System.Drawing.Point(16, 104)
        Me.Label3.Name = "Label3"
        Me.Label3.TabIndex = 2
        Me.Label3.Text = "类别："
        '
        'Label4
        '
        Me.Label4.Location = New System.Drawing.Point(16, 144)
        Me.Label4.Name = "Label4"
        Me.Label4.TabIndex = 3
        Me.Label4.Text = "发生地点："
        '
        'Label5
        '
        Me.Label5.Location = New System.Drawing.Point(16, 184)
        Me.Label5.Name = "Label5"
        Me.Label5.TabIndex = 4
        Me.Label5.Text = "发生时间："
        '
        'Label6
        '
        Me.Label6.Location = New System.Drawing.Point(16, 224)
        Me.Label6.Name = "Label6"
        Me.Label6.TabIndex = 5
        Me.Label6.Text = "持续时间："
        '
        'Label7
        '
        Me.Label7.Location = New System.Drawing.Point(16, 264)
        Me.Label7.Name = "Label7"
        Me.Label7.TabIndex = 6
        Me.Label7.Text = "受伤人数："
        '
        'Label8
        '
        Me.Label8.Location = New System.Drawing.Point(344, 24)
        Me.Label8.Name = "Label8"
        Me.Label8.TabIndex = 7
        Me.Label8.Text = "财产损失："
        '
        'Label9
        '
        Me.Label9.Location = New System.Drawing.Point(344, 64)
        Me.Label9.Name = "Label9"
        Me.Label9.TabIndex = 8
        Me.Label9.Text = "申报时间："
        '
        'Label10
        '
        Me.Label10.Location = New System.Drawing.Point(344, 104)
        Me.Label10.Name = "Label10"
        Me.Label10.TabIndex = 9
        Me.Label10.Text = "申报单位："
        '
        'Label11
        '
        Me.Label11.Location = New System.Drawing.Point(344, 144)
        Me.Label11.Name = "Label11"
        Me.Label11.TabIndex = 10
        Me.Label11.Text = "申报单位电话："
        '
        'Label12
        '
        Me.Label12.Location = New System.Drawing.Point(344, 184)
        Me.Label12.Name = "Label12"
        Me.Label12.TabIndex = 11
        Me.Label12.Text = "修改时间："
        '
        'Label13
        '
        Me.Label13.Location = New System.Drawing.Point(344, 232)
        Me.Label13.Name = "Label13"
        Me.Label13.TabIndex = 12
        Me.Label13.Text = "修改单位："
        '
        'Label14
        '
        Me.Label14.Location = New System.Drawing.Point(344, 264)
        Me.Label14.Name = "Label14"
        Me.Label14.TabIndex = 13
        Me.Label14.Text = "修改单位电话："
        '
        'Label16
        '
        Me.Label16.Location = New System.Drawing.Point(16, 312)
        Me.Label16.Name = "Label16"
        Me.Label16.TabIndex = 15
        Me.Label16.Text = "死亡人数："
        '
        'Txtbianhao
        '
        Me.Txtbianhao.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.编号"))
        Me.Txtbianhao.Enabled = False
        Me.Txtbianhao.Location = New System.Drawing.Point(120, 16)
        Me.Txtbianhao.Name = "Txtbianhao"
        Me.Txtbianhao.Size = New System.Drawing.Size(120, 21)
        Me.Txtbianhao.TabIndex = 16
        Me.Txtbianhao.Text = ""
        '
        'DataSet21
        '
        Me.DataSet21.DataSetName = "DataSet2"
        Me.DataSet21.Locale = New System.Globalization.CultureInfo("zh-CN")
        Me.DataSet21.Namespace = "http://www.tempuri.org/DataSet2.xsd"
        '
        'Txtaccidentname
        '
        Me.Txtaccidentname.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.突发事件名称"))
        Me.Txtaccidentname.Enabled = False
        Me.Txtaccidentname.Location = New System.Drawing.Point(120, 64)
        Me.Txtaccidentname.Name = "Txtaccidentname"
        Me.Txtaccidentname.Size = New System.Drawing.Size(200, 21)
        Me.Txtaccidentname.TabIndex = 17
        Me.Txtaccidentname.Text = ""
        '
        'Txtaccidentaddr
        '
        Me.Txtaccidentaddr.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.发生地点"))
        Me.Txtaccidentaddr.Enabled = False
        Me.Txtaccidentaddr.Location = New System.Drawing.Point(120, 144)
        Me.Txtaccidentaddr.Name = "Txtaccidentaddr"
        Me.Txtaccidentaddr.Size = New System.Drawing.Size(200, 21)
        Me.Txtaccidentaddr.TabIndex = 18
        Me.Txtaccidentaddr.Text = ""
        '
        'Txtbegintime