📄 form2.vb
字号:
'
Me.Button2.Location = New System.Drawing.Point(16, 64)
Me.Button2.Name = "Button2"
Me.Button2.TabIndex = 1
Me.Button2.Text = "添加"
'
'Button1
'
Me.Button1.Location = New System.Drawing.Point(16, 144)
Me.Button1.Name = "Button1"
Me.Button1.TabIndex = 0
Me.Button1.Text = "更新"
'
'GroupBox2
'
Me.GroupBox2.Controls.Add(Me.TextBox3)
Me.GroupBox2.Controls.Add(Me.Label1)
Me.GroupBox2.Controls.Add(Me.CheckBox4)
Me.GroupBox2.Controls.Add(Me.CheckBox3)
Me.GroupBox2.Controls.Add(Me.CheckBox2)
Me.GroupBox2.Controls.Add(Me.CheckBox1)
Me.GroupBox2.Controls.Add(Me.Label4)
Me.GroupBox2.Controls.Add(Me.Label3)
Me.GroupBox2.Controls.Add(Me.Label2)
Me.GroupBox2.Controls.Add(Me.TextBox4)
Me.GroupBox2.Controls.Add(Me.TextBox1)
Me.GroupBox2.Controls.Add(Me.TextBox2)
Me.GroupBox2.Controls.Add(Me.Button3)
Me.GroupBox2.Controls.Add(Me.Button5)
Me.GroupBox2.Location = New System.Drawing.Point(152, 16)
Me.GroupBox2.Name = "GroupBox2"
Me.GroupBox2.Size = New System.Drawing.Size(240, 192)
Me.GroupBox2.TabIndex = 3
Me.GroupBox2.TabStop = False
Me.GroupBox2.Text = "查询"
'
'TextBox3
'
Me.TextBox3.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.Ds01, "科研人员.学历"))
Me.TextBox3.Location = New System.Drawing.Point(88, 86)
Me.TextBox3.Name = "TextBox3"
Me.TextBox3.Size = New System.Drawing.Size(104, 21)
Me.TextBox3.TabIndex = 16
Me.TextBox3.Text = ""
'
'Label1
'
Me.Label1.Location = New System.Drawing.Point(8, 32)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(56, 23)
Me.Label1.TabIndex = 15
Me.Label1.Text = "人员号:"
'
'CheckBox4
'
Me.CheckBox4.Location = New System.Drawing.Point(208, 120)
Me.CheckBox4.Name = "CheckBox4"
Me.CheckBox4.Size = New System.Drawing.Size(28, 24)
Me.CheckBox4.TabIndex = 14
'
'CheckBox3
'
Me.CheckBox3.Location = New System.Drawing.Point(208, 88)
Me.CheckBox3.Name = "CheckBox3"
Me.CheckBox3.Size = New System.Drawing.Size(24, 24)
Me.CheckBox3.TabIndex = 13
'
'CheckBox2
'
Me.CheckBox2.Location = New System.Drawing.Point(208, 56)
Me.CheckBox2.Name = "CheckBox2"
Me.CheckBox2.Size = New System.Drawing.Size(24, 24)
Me.CheckBox2.TabIndex = 12
'
'CheckBox1
'
Me.CheckBox1.Checked = True
Me.CheckBox1.CheckState = System.Windows.Forms.CheckState.Checked
Me.CheckBox1.Location = New System.Drawing.Point(208, 24)
Me.CheckBox1.Name = "CheckBox1"
Me.CheckBox1.Size = New System.Drawing.Size(24, 24)
Me.CheckBox1.TabIndex = 11
'
'Label4
'
Me.Label4.Location = New System.Drawing.Point(16, 120)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(48, 23)
Me.Label4.TabIndex = 10
Me.Label4.Text = "年龄:"
'
'Label3
'
Me.Label3.Location = New System.Drawing.Point(16, 96)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(48, 23)
Me.Label3.TabIndex = 8
Me.Label3.Text = "学历:"
'
'Label2
'
Me.Label2.Location = New System.Drawing.Point(16, 64)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(48, 23)
Me.Label2.TabIndex = 7
Me.Label2.Text = "职称:"
'
'TextBox4
'
Me.TextBox4.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.Ds01, "科研人员.年龄"))
Me.TextBox4.Location = New System.Drawing.Point(88, 120)
Me.TextBox4.Name = "TextBox4"
Me.TextBox4.Size = New System.Drawing.Size(104, 21)
Me.TextBox4.TabIndex = 5
Me.TextBox4.Text = ""
'
'TextBox1
'
Me.TextBox1.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.Ds01, "科研人员.人员编号"))
Me.TextBox1.Location = New System.Drawing.Point(88, 24)
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Size = New System.Drawing.Size(104, 21)
Me.TextBox1.TabIndex = 3
Me.TextBox1.Text = ""
'
'TextBox2
'
Me.TextBox2.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.Ds01, "科研人员.职称"))
Me.TextBox2.Location = New System.Drawing.Point(88, 56)
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.Size = New System.Drawing.Size(104, 21)
Me.TextBox2.TabIndex = 4
Me.TextBox2.Text = ""
'
'Button3
'
Me.Button3.Location = New System.Drawing.Point(8, 152)
Me.Button3.Name = "Button3"
Me.Button3.TabIndex = 6
Me.Button3.Text = "查询"
'
'Button5
'
Me.Button5.Location = New System.Drawing.Point(104, 152)
Me.Button5.Name = "Button5"
Me.Button5.TabIndex = 4
Me.Button5.Text = "删除"
'
'TabPage2
'
Me.TabPage2.Controls.Add(Me.GroupBox7)
Me.TabPage2.Controls.Add(Me.GroupBox5)
Me.TabPage2.Controls.Add(Me.GroupBox12)
Me.TabPage2.Location = New System.Drawing.Point(4, 21)
Me.TabPage2.Name = "TabPage2"
Me.TabPage2.Size = New System.Drawing.Size(768, 223)
Me.TabPage2.TabIndex = 1
Me.TabPage2.Text = "科研项目管理"
'
'GroupBox7
'
Me.GroupBox7.Controls.Add(Me.Label7)
Me.GroupBox7.Controls.Add(Me.Label6)
Me.GroupBox7.Controls.Add(Me.TextBox15)
Me.GroupBox7.Controls.Add(Me.TextBox9)
Me.GroupBox7.Controls.Add(Me.TextBox21)
Me.GroupBox7.Controls.Add(Me.TextBox20)
Me.GroupBox7.Controls.Add(Me.TextBox19)
Me.GroupBox7.Controls.Add(Me.Label24)
Me.GroupBox7.Controls.Add(Me.Label23)
Me.GroupBox7.Controls.Add(Me.Label22)
Me.GroupBox7.Controls.Add(Me.TextBox12)
Me.GroupBox7.Controls.Add(Me.Label14)
Me.GroupBox7.Location = New System.Drawing.Point(360, 16)
Me.GroupBox7.Name = "GroupBox7"
Me.GroupBox7.Size = New System.Drawing.Size(400, 192)
Me.GroupBox7.TabIndex = 2
Me.GroupBox7.TabStop = False
Me.GroupBox7.Text = "结果"
'
'Label7
'
Me.Label7.Location = New System.Drawing.Point(200, 112)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(24, 40)
Me.Label7.TabIndex = 33
Me.Label7.Text = "成员"
'
'Label6
'
Me.Label6.Location = New System.Drawing.Point(200, 32)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(16, 48)
Me.Label6.TabIndex = 32
Me.Label6.Text = "内容"
'
'TextBox15
'
Me.TextBox15.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.Ds11, "项目表.工作人员"))
Me.TextBox15.Location = New System.Drawing.Point(224, 104)
Me.TextBox15.Multiline = True
Me.TextBox15.Name = "TextBox15"
Me.TextBox15.Size = New System.Drawing.Size(152, 72)
Me.TextBox15.TabIndex = 31
Me.TextBox15.Text = "工作人员"
'
'Ds11
'
Me.Ds11.DataSetName = "ds1"
Me.Ds11.Locale = New System.Globalization.CultureInfo("zh-CN")
'
'TextBox9
'
Me.TextBox9.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.Ds11, "项目表.研究内容"))
Me.TextBox9.Location = New System.Drawing.Point(224, 24)
Me.TextBox9.Multiline = True
Me.TextBox9.Name = "TextBox9"
Me.TextBox9.Size = New System.Drawing.Size(152, 72)
Me.TextBox9.TabIndex = 30
Me.TextBox9.Text = "研究内容"
'
'TextBox21
'
Me.TextBox21.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.Ds11, "项目表.项目期限"))
Me.TextBox21.Location = New System.Drawing.Point(96, 152)
Me.TextBox21.Name = "TextBox21"
Me.TextBox21.TabIndex = 25
Me.TextBox21.Text = ""
'
'TextBox20
'
Me.TextBox20.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.Ds11, "项目表.是否到款"))
Me.TextBox20.Location = New System.Drawing.Point(96, 120)
Me.TextBox20.Name = "TextBox20"
Me.TextBox20.TabIndex = 24
Me.TextBox20.Text = ""
'
'TextBox19
'
Me.TextBox19.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.Ds11, "项目表.是否审批"))
Me.TextBox19.Location = New System.Drawing.Point(96, 80)
Me.TextBox19.Name = "TextBox19"
Me.TextBox19.TabIndex = 23
Me.TextBox19.Text = ""
'
'Label24
'
Me.Label24.Location = New System.Drawing.Point(8, 160)
Me.Label24.Name = "Label24"
Me.Label24.Size = New System.Drawing.Size(80, 24)
Me.Label24.TabIndex = 22
Me.Label24.Text = "项目期限:"
'
'Label23
'
Me.Label23.Location = New System.Drawing.Point(8, 120)
Me.Label23.Name = "Label23"
Me.Label23.Size = New System.Drawing.Size(80, 24)
Me.Label23.TabIndex = 21
Me.Label23.Text = "是否到款:"
'
'Label22
'
Me.Label22.Location = New System.Drawing.Point(8, 80)
Me.Label22.Name = "Label22"
Me.Label22.Size = New System.Drawing.Size(80, 24)
Me.Label22.TabIndex = 20
Me.Label22.Text = "是否审批:"
'
'TextBox12
'
Me.TextBox12.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.Ds11, "项目表.项目名称"))
Me.TextBox12.Location = New System.Drawing.Point(96, 40)
Me.TextBox12.Name = "TextBox12"
Me.TextBox12.Size = New System.Drawing.Size(96, 21)
Me.TextBox12.TabIndex = 19
Me.TextBox12.Text = ""
'
'Label14
'
Me.Label14.Location = New System.Drawing.Point(8, 48)
Me.Label14.Name = "Label14"
Me.Label14.Size = New System.Drawing.Size(80, 24)
Me.Label14.TabIndex = 15
Me.Label14.Text = "项目名称:"
'
'GroupBox5
'
Me.GroupBox5.Controls.Add(Me.CheckBox8)
Me.GroupBox5.Controls.Add(Me.Button27)
Me.GroupBox5.Controls.Add(Me.Button14)
Me.GroupBox5.Controls.Add(Me.TextBox14)
Me.GroupBox5.Controls.Add(Me.Label17)
Me.GroupBox5.Controls.Add(Me.CheckBox7)
Me.GroupBox5.Controls.Add(Me.CheckBox6)
Me.GroupBox5.Controls.Add(Me.CheckBox5)
Me.GroupBox5.Controls.Add(Me.TextBox13)
Me.GroupBox5.Controls.Add(Me.TextBox11)
Me.GroupBox5.Controls.Add(Me.Label16)
Me.GroupBox5.Controls.Add(Me.Label8)
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -