📄 frmaccidentadd.vb
字号:
'
Me.Label4.Location = New System.Drawing.Point(32, 120)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(72, 23)
Me.Label4.TabIndex = 3
Me.Label4.Text = "发生时间:"
'
'Label5
'
Me.Label5.Location = New System.Drawing.Point(32, 168)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(72, 23)
Me.Label5.TabIndex = 4
Me.Label5.Text = "持续时间:"
'
'Label6
'
Me.Label6.Location = New System.Drawing.Point(32, 208)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(72, 23)
Me.Label6.TabIndex = 5
Me.Label6.Text = "发生地点:"
'
'Txtaccidentname
'
Me.Txtaccidentname.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.突发事件名称"))
Me.Txtaccidentname.Enabled = False
Me.Txtaccidentname.Location = New System.Drawing.Point(128, 40)
Me.Txtaccidentname.Name = "Txtaccidentname"
Me.Txtaccidentname.Size = New System.Drawing.Size(152, 21)
Me.Txtaccidentname.TabIndex = 6
Me.Txtaccidentname.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(128, 72)
Me.Cbaccidenttype.Name = "Cbaccidenttype"
Me.Cbaccidenttype.Size = New System.Drawing.Size(120, 20)
Me.Cbaccidenttype.TabIndex = 7
'
'Txtbegintime
'
Me.Txtbegintime.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet21, "突发事件信息表.发生时间"))
Me.Txtbegintime.Enabled = False
Me.Txtbegintime.Location = New System.Drawing.Point(128, 120)
Me.Txtbegintime.Name = "Txtbegintime"
Me.Txtbegintime.Size = New System.Drawing.Size(120, 21)
Me.Txtbegintime.TabIndex = 8
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(128, 168)
Me.Txtlasttime.Name = "Txtlasttime"
Me.Txtlasttime.TabIndex = 9
Me.Txtlasttime.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(128, 208)
Me.Txtaccidentaddr.Name = "Txtaccidentaddr"
Me.Txtaccidentaddr.Size = New System.Drawing.Size(184, 21)
Me.Txtaccidentaddr.TabIndex = 10
Me.Txtaccidentaddr.Text = ""
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(32, 248)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(104, 23)
Me.Label1.TabIndex = 11
Me.Label1.Text = "受伤人数(人):"
'
'Label7
'
Me.Label7.Location = New System.Drawing.Point(32, 280)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(104, 23)
Me.Label7.TabIndex = 12
Me.Label7.Text = "死亡人数(人):"
'
'Label8
'
Me.Label8.Location = New System.Drawing.Point(352, 40)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(72, 23)
Me.Label8.TabIndex = 13
Me.Label8.Text = "财产损失:"
'
'Label9
'
Me.Label9.Location = New System.Drawing.Point(352, 80)
Me.Label9.Name = "Label9"
Me.Label9.Size = New System.Drawing.Size(72, 23)
Me.Label9.TabIndex = 14
Me.Label9.Text = "申报时间:"
'
'Label10
'
Me.Label10.Location = New System.Drawing.Point(352, 120)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(72, 23)
Me.Label10.TabIndex = 15
Me.Label10.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(128, 248)
Me.Txthurtnumber.Name = "Txthurtnumber"
Me.Txthurtnumber.Size = New System.Drawing.Size(96, 21)
Me.Txthurtnumber.TabIndex = 16
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(128, 280)
Me.Txtdeadnumber.Name = "Txtdeadnumber"
Me.Txtdeadnumber.Size = New System.Drawing.Size(96, 21)
Me.Txtdeadnumber.TabIndex = 17
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(440, 40)
Me.Txtcost.Name = "Txtcost"
Me.Txtcost.Size = New System.Drawing.Size(88, 21)
Me.Txtcost.TabIndex = 18
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(440, 80)
Me.Txtapplytime.Name = "Txtapplytime"
Me.Txtapplytime.Size = New System.Drawing.Size(88, 21)
Me.Txtapplytime.TabIndex = 19
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(440, 120)
Me.Txtapplycompany.Name = "Txtapplycompany"
Me.Txtapplycompany.Size = New System.Drawing.Size(168, 21)
Me.Txtapplycompany.TabIndex = 20
Me.Txtapplycompany.Text = ""
'
'Label11
'
Me.Label11.Location = New System.Drawing.Point(352, 160)
Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(96, 23)
Me.Label11.TabIndex = 21
Me.Label11.Text = "申报单位电话:"
'
'Label12
'
Me.Label12.Location = New System.Drawing.Point(352, 200)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -