frmaccidentsearch.vb

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

        Me.Bttypesearch.Location = New System.Drawing.Point(504, 24)
        Me.Bttypesearch.Name = "Bttypesearch"
        Me.Bttypesearch.Size = New System.Drawing.Size(112, 23)
        Me.Bttypesearch.TabIndex = 3
        Me.Bttypesearch.Text = "按类别查询"
        '
        'Dgresult
        '
        Me.Dgresult.DataMember = ""
        Me.Dgresult.HeaderForeColor = System.Drawing.SystemColors.ControlText
        Me.Dgresult.Location = New System.Drawing.Point(8, 56)
        Me.Dgresult.Name = "Dgresult"
        Me.Dgresult.Size = New System.Drawing.Size(688, 312)
        Me.Dgresult.TabIndex = 2
        '
        'Cbaccidenttype
        '
        Me.Cbaccidenttype.Enabled = False
        Me.Cbaccidenttype.Items.AddRange(New Object() {"火灾事故", "恐怖事件", "环境污染", "森林火灾", "突发公共卫生事故", "交通事故", "地质灾害", "生产事故", "洪涝灾害", "城市公共设施安全事故", "有害气体泄漏事故"})
        Me.Cbaccidenttype.Location = New System.Drawing.Point(240, 24)
        Me.Cbaccidenttype.Name = "Cbaccidenttype"
        Me.Cbaccidenttype.Size = New System.Drawing.Size(168, 20)
        Me.Cbaccidenttype.TabIndex = 1
        '
        'Label1
        '
        Me.Label1.Location = New System.Drawing.Point(32, 24)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(184, 23)
        Me.Label1.TabIndex = 0
        Me.Label1.Text = "请选择查询突发事件信息类别："
        '
        'TabPage3
        '
        Me.TabPage3.Controls.AddRange(New System.Windows.Forms.Control() {Me.DataGrid2, Me.Bthurtnusearch, Me.Label4, Me.Txthurtnumber, Me.Label3})
        Me.TabPage3.Location = New System.Drawing.Point(4, 21)
        Me.TabPage3.Name = "TabPage3"
        Me.TabPage3.Size = New System.Drawing.Size(704, 375)
        Me.TabPage3.TabIndex = 2
        Me.TabPage3.Text = "按照受伤人数查询"
        '
        'DataGrid2
        '
        Me.DataGrid2.DataMember = ""
        Me.DataGrid2.HeaderForeColor = System.Drawing.SystemColors.ControlText
        Me.DataGrid2.Location = New System.Drawing.Point(8, 56)
        Me.DataGrid2.Name = "DataGrid2"
        Me.DataGrid2.Size = New System.Drawing.Size(688, 312)
        Me.DataGrid2.TabIndex = 4
        '
        'Bthurtnusearch
        '
        Me.Bthurtnusearch.Location = New System.Drawing.Point(464, 16)
        Me.Bthurtnusearch.Name = "Bthurtnusearch"
        Me.Bthurtnusearch.Size = New System.Drawing.Size(112, 32)
        Me.Bthurtnusearch.TabIndex = 3
        Me.Bthurtnusearch.Text = "按受伤人数查询"
        '
        'Label4
        '
        Me.Label4.Location = New System.Drawing.Point(280, 24)
        Me.Label4.Name = "Label4"
        Me.Label4.TabIndex = 2
        Me.Label4.Text = "（人）"
        '
        'Txthurtnumber
        '
        Me.Txthurtnumber.Enabled = False
        Me.Txthurtnumber.Location = New System.Drawing.Point(160, 16)
        Me.Txthurtnumber.Name = "Txthurtnumber"
        Me.Txthurtnumber.Size = New System.Drawing.Size(120, 21)
        Me.Txthurtnumber.TabIndex = 1
        Me.Txthurtnumber.Text = ""
        '
        'Label3
        '
        Me.Label3.Location = New System.Drawing.Point(24, 16)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(120, 23)
        Me.Label3.TabIndex = 0
        Me.Label3.Text = "请输入受伤人数："
        '
        'TabPage4
        '
        Me.TabPage4.Controls.AddRange(New System.Windows.Forms.Control() {Me.Button1, Me.DataGrid3, Me.Label8, Me.Txthurt, Me.Label7, Me.Cbrelation, Me.Cbtype, Me.Label6, Me.Label5})
        Me.TabPage4.Location = New System.Drawing.Point(4, 21)
        Me.TabPage4.Name = "TabPage4"
        Me.TabPage4.Size = New System.Drawing.Size(704, 375)
        Me.TabPage4.TabIndex = 3
        Me.TabPage4.Text = "综合查询"
        '
        'Button1
        '
        Me.Button1.Location = New System.Drawing.Point(576, 56)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(104, 23)
        Me.Button1.TabIndex = 8
        Me.Button1.Text = "综合查询"
        '
        'DataGrid3
        '
        Me.DataGrid3.DataMember = ""
        Me.DataGrid3.HeaderForeColor = System.Drawing.SystemColors.ControlText
        Me.DataGrid3.Location = New System.Drawing.Point(8, 88)
        Me.DataGrid3.Name = "DataGrid3"
        Me.DataGrid3.Size = New System.Drawing.Size(688, 280)
        Me.DataGrid3.TabIndex = 7
        '
        'Label8
        '
        Me.Label8.Location = New System.Drawing.Point(16, 64)
        Me.Label8.Name = "Label8"
        Me.Label8.TabIndex = 6
        Me.Label8.Text = "查询结果："
        '
        'Txthurt
        '
        Me.Txthurt.Enabled = False
        Me.Txthurt.Location = New System.Drawing.Point(576, 24)
        Me.Txthurt.Name = "Txthurt"
        Me.Txthurt.TabIndex = 5
        Me.Txthurt.Text = ""
        '
        'Label7
        '
        Me.Label7.Location = New System.Drawing.Point(512, 24)
        Me.Label7.Name = "Label7"
        Me.Label7.TabIndex = 4
        Me.Label7.Text = "受伤人数："
        '
        'Cbrelation
        '
        Me.Cbrelation.Enabled = False
        Me.Cbrelation.Items.AddRange(New Object() {"and", "or"})
        Me.Cbrelation.Location = New System.Drawing.Point(424, 24)
        Me.Cbrelation.Name = "Cbrelation"
        Me.Cbrelation.Size = New System.Drawing.Size(80, 20)
        Me.Cbrelation.TabIndex = 3
        Me.Cbrelation.Text = "and"
        '
        'Cbtype
        '
        Me.Cbtype.Enabled = False
        Me.Cbtype.Items.AddRange(New Object() {"火灾事故", "恐怖事件", "环境污染", "森林火灾", "突发公共卫生事故", "交通事故", "地质灾害", "生产事故", "洪涝灾害", "城市公共设施安全事故", "有害气体泄漏事故"})
        Me.Cbtype.Location = New System.Drawing.Point(288, 24)
        Me.Cbtype.Name = "Cbtype"
        Me.Cbtype.Size = New System.Drawing.Size(121, 20)
        Me.Cbtype.TabIndex = 2
        '
        'Label6
        '
        Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
        Me.Label6.Location = New System.Drawing.Point(176, 24)
        Me.Label6.Name = "Label6"
        Me.Label6.TabIndex = 1
        Me.Label6.Text = "突发事件类别："
        '
        'Label5
        '
        Me.Label5.Font = New System.Drawing.Font("宋体", 10.5!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte))
        Me.Label5.Location = New System.Drawing.Point(16, 16)
        Me.Label5.Name = "Label5"
        Me.Label5.Size = New System.Drawing.Size(128, 24)
        Me.Label5.TabIndex = 0
        Me.Label5.Text = "请设置查询条件："
        '
        'Btexitsearch
        '
        Me.Btexitsearch.Location = New System.Drawing.Point(624, 408)
        Me.Btexitsearch.Name = "Btexitsearch"
        Me.Btexitsearch.Size = New System.Drawing.Size(80, 24)
        Me.Btexitsearch.TabIndex = 1
        Me.Btexitsearch.Text = "退出"
        '
        'OleDbDataAdapter1
        '