form1.vb

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

        '
        Me.Txtbegintime.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.发生时间"))
        Me.Txtbegintime.Enabled = False
        Me.Txtbegintime.Location = New System.Drawing.Point(120, 184)
        Me.Txtbegintime.Name = "Txtbegintime"
        Me.Txtbegintime.Size = New System.Drawing.Size(168, 21)
        Me.Txtbegintime.TabIndex = 19
        Me.Txtbegintime.Text = ""
        '
        'Txtlasttime
        '
        Me.Txtlasttime.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.持续时间"))
        Me.Txtlasttime.Enabled = False
        Me.Txtlasttime.Location = New System.Drawing.Point(120, 224)
        Me.Txtlasttime.Name = "Txtlasttime"
        Me.Txtlasttime.Size = New System.Drawing.Size(144, 21)
        Me.Txtlasttime.TabIndex = 20
        Me.Txtlasttime.Text = ""
        '
        'Txthurtnumber
        '
        Me.Txthurtnumber.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.受伤人数"))
        Me.Txthurtnumber.Enabled = False
        Me.Txthurtnumber.Location = New System.Drawing.Point(120, 264)
        Me.Txthurtnumber.Name = "Txthurtnumber"
        Me.Txthurtnumber.Size = New System.Drawing.Size(144, 21)
        Me.Txthurtnumber.TabIndex = 21
        Me.Txthurtnumber.Text = ""
        '
        'Txtdeadnumber
        '
        Me.Txtdeadnumber.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.死亡人数"))
        Me.Txtdeadnumber.Enabled = False
        Me.Txtdeadnumber.Location = New System.Drawing.Point(120, 304)
        Me.Txtdeadnumber.Name = "Txtdeadnumber"
        Me.Txtdeadnumber.Size = New System.Drawing.Size(144, 21)
        Me.Txtdeadnumber.TabIndex = 22
        Me.Txtdeadnumber.Text = ""
        '
        'Txtcost
        '
        Me.Txtcost.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.财产损失"))
        Me.Txtcost.Enabled = False
        Me.Txtcost.Location = New System.Drawing.Point(456, 24)
        Me.Txtcost.Name = "Txtcost"
        Me.Txtcost.Size = New System.Drawing.Size(176, 21)
        Me.Txtcost.TabIndex = 23
        Me.Txtcost.Text = ""
        '
        'Txtapplytime
        '
        Me.Txtapplytime.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.申报时间"))
        Me.Txtapplytime.Enabled = False
        Me.Txtapplytime.Location = New System.Drawing.Point(456, 64)
        Me.Txtapplytime.Name = "Txtapplytime"
        Me.Txtapplytime.Size = New System.Drawing.Size(176, 21)
        Me.Txtapplytime.TabIndex = 24
        Me.Txtapplytime.Text = ""
        '
        'Txtapplycompany
        '
        Me.Txtapplycompany.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.申报单位"))
        Me.Txtapplycompany.Enabled = False
        Me.Txtapplycompany.Location = New System.Drawing.Point(456, 104)
        Me.Txtapplycompany.Name = "Txtapplycompany"
        Me.Txtapplycompany.Size = New System.Drawing.Size(216, 21)
        Me.Txtapplycompany.TabIndex = 25
        Me.Txtapplycompany.Text = ""
        '
        'Txtapplycompanyphone
        '
        Me.Txtapplycompanyphone.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.申报单位电话"))
        Me.Txtapplycompanyphone.Enabled = False
        Me.Txtapplycompanyphone.Location = New System.Drawing.Point(456, 144)
        Me.Txtapplycompanyphone.Name = "Txtapplycompanyphone"
        Me.Txtapplycompanyphone.Size = New System.Drawing.Size(176, 21)
        Me.Txtapplycompanyphone.TabIndex = 26
        Me.Txtapplycompanyphone.Text = ""
        '
        'Txtmodifytime
        '
        Me.Txtmodifytime.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.修改时间"))
        Me.Txtmodifytime.Enabled = False
        Me.Txtmodifytime.Location = New System.Drawing.Point(456, 184)
        Me.Txtmodifytime.Name = "Txtmodifytime"
        Me.Txtmodifytime.Size = New System.Drawing.Size(176, 21)
        Me.Txtmodifytime.TabIndex = 27
        Me.Txtmodifytime.Text = ""
        '
        'Txtmodifycompany
        '
        Me.Txtmodifycompany.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.修改单位"))
        Me.Txtmodifycompany.Enabled = False
        Me.Txtmodifycompany.Location = New System.Drawing.Point(456, 224)
        Me.Txtmodifycompany.Name = "Txtmodifycompany"
        Me.Txtmodifycompany.Size = New System.Drawing.Size(224, 21)
        Me.Txtmodifycompany.TabIndex = 28
        Me.Txtmodifycompany.Text = ""
        '
        'Txtmodifycompanyphone
        '
        Me.Txtmodifycompanyphone.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.修改单位电话"))
        Me.Txtmodifycompanyphone.Enabled = False
        Me.Txtmodifycompanyphone.Location = New System.Drawing.Point(456, 264)
        Me.Txtmodifycompanyphone.Name = "Txtmodifycompanyphone"
        Me.Txtmodifycompanyphone.Size = New System.Drawing.Size(184, 21)
        Me.Txtmodifycompanyphone.TabIndex = 29
        Me.Txtmodifycompanyphone.Text = ""
        '
        'Cbaccidenttype
        '
        Me.Cbaccidenttype.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.类别"))
        Me.Cbaccidenttype.Enabled = False
        Me.Cbaccidenttype.Items.AddRange(New Object() {"火灾事故", "恐怖事件", "环境污染", "森林火灾", "突发公共卫生事故", "交通事故", "地质灾害", "生产事故", "洪涝灾害", "城市公共设施安全事故", "有害气体泄漏事故"})
        Me.Cbaccidenttype.Location = New System.Drawing.Point(120, 104)
        Me.Cbaccidenttype.Name = "Cbaccidenttype"
        Me.Cbaccidenttype.Size = New System.Drawing.Size(144, 20)
        Me.Cbaccidenttype.TabIndex = 31
        Me.Cbaccidenttype.Text = "请选择突发事件类别"
        '
        'GroupBox1
        '
        Me.GroupBox1.Controls.AddRange(New System.Windows.Forms.Control() {Me.Txtadditional})
        Me.GroupBox1.Location = New System.Drawing.Point(16, 344)
        Me.GroupBox1.Name = "GroupBox1"
        Me.GroupBox1.Size = New System.Drawing.Size(672, 80)
        Me.GroupBox1.TabIndex = 32
        Me.GroupBox1.TabStop = False
        Me.GroupBox1.Text = "备注："
        '
        'Txtadditional
        '
        Me.Txtadditional.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.备注"))
        Me.Txtadditional.Enabled = False
        Me.Txtadditional.Location = New System.Drawing.Point(16, 16)
        Me.Txtadditional.Multiline = True
        Me.Txtadditional.Name = "Txtadditional"
        Me.Txtadditional.Size = New System.Drawing.Size(648, 56)
        Me.Txtadditional.TabIndex = 0
        Me.Txtadditional.Text = ""
        '
        'GroupBox2
        '
        Me.GroupBox2.Controls.AddRange(New System.Windows.Forms.Control() {Me.Btseeall, Me.Btlastrecord, Me.Btnextrecord, Me.Btfrontrecord, Me.Btfirstrecord})
        Me.GroupBox2.Location = New System.Drawing.Point(16, 440)
        Me.GroupBox2.Name = "GroupBox2"
        Me.GroupBox2.Size = New System.Drawing.Size(672, 56)
        Me.GroupBox2.TabIndex = 33
        Me.GroupBox2.TabStop = False
        Me.GroupBox2.Text = "查看突发事件信息数据："
        '
        'Btseeall
        '
        Me.Btseeall.Location = New System.Drawing.Point(560, 24)
        Me.Btseeall.Name = "Btseeall"
        Me.Btseeall.Size = New System.Drawing.Size(88, 23)
        Me.Btseeall.TabIndex = 4
        Me.Btseeall.Text = "浏览数据"
        '
        'Btlastrecord
        '
        Me.Btlastrecord.Location = New System.Drawing.Point(440, 24)
        Me.Btlastrecord.Name = "Btlastrecord"
        Me.Btlastrecord.Size = New System.Drawing.Size(88, 23)
        Me.Btlastrecord.TabIndex = 3
        Me.Btlastrecord.Text = "最后一条记录"
        '
        'Btnextrecord
        '
        Me.Btnextrecord.Location = New System.Drawing.Point(304, 24)
        Me.Btnextrecord.Name = "Btnextrecord"
        Me.Btnextrecord.Size = New System.Drawing.Size(104, 23)
        Me.Btnextrecord.TabIndex = 2