frmpeoplemanage.vb

来自「使用的人力资源管理系统」· VB 代码 · 共 774 行 · 第 1/4 页

VB
774
字号
        Me.grbPeople.Controls.Add(Me.TextBox8)
        Me.grbPeople.Controls.Add(Me.TextBox7)
        Me.grbPeople.Controls.Add(Me.TextBox6)
        Me.grbPeople.Controls.Add(Me.TextBox5)
        Me.grbPeople.Controls.Add(Me.TextBox4)
        Me.grbPeople.Controls.Add(Me.TextBox3)
        Me.grbPeople.Controls.Add(Me.TextBox2)
        Me.grbPeople.Controls.Add(Me.TextBox1)
        Me.grbPeople.Controls.Add(Me.Label20)
        Me.grbPeople.Controls.Add(Me.Label19)
        Me.grbPeople.Controls.Add(Me.Label18)
        Me.grbPeople.Controls.Add(Me.Label17)
        Me.grbPeople.Controls.Add(Me.Label16)
        Me.grbPeople.Controls.Add(Me.Label15)
        Me.grbPeople.Controls.Add(Me.Label14)
        Me.grbPeople.Controls.Add(Me.Label13)
        Me.grbPeople.Controls.Add(Me.Label12)
        Me.grbPeople.Controls.Add(Me.Label11)
        Me.grbPeople.Controls.Add(Me.Label10)
        Me.grbPeople.Controls.Add(Me.Label9)
        Me.grbPeople.Controls.Add(Me.Label8)
        Me.grbPeople.Controls.Add(Me.Label7)
        Me.grbPeople.Controls.Add(Me.Label6)
        Me.grbPeople.Controls.Add(Me.Label5)
        Me.grbPeople.Controls.Add(Me.Label4)
        Me.grbPeople.Controls.Add(Me.Label3)
        Me.grbPeople.Controls.Add(Me.Label2)
        Me.grbPeople.Controls.Add(Me.Label1)
        Me.grbPeople.Controls.Add(Me.TextBox12)
        Me.grbPeople.Location = New System.Drawing.Point(0, 160)
        Me.grbPeople.Name = "grbPeople"
        Me.grbPeople.Size = New System.Drawing.Size(608, 161)
        Me.grbPeople.TabIndex = 13
        Me.grbPeople.TabStop = False
        '
        'cbbDepCode
        '
        Me.cbbDepCode.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.单位编号", True))
        Me.cbbDepCode.Location = New System.Drawing.Point(328, 128)
        Me.cbbDepCode.Name = "cbbDepCode"
        Me.cbbDepCode.Size = New System.Drawing.Size(64, 20)
        Me.cbbDepCode.TabIndex = 40
        '
        'DataSet11
        '
        Me.DataSet11.DataSetName = "DataSet1"
        Me.DataSet11.Locale = New System.Globalization.CultureInfo("zh-CN")
        Me.DataSet11.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
        '
        'cbbSex
        '
        Me.cbbSex.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.性别", True))
        Me.cbbSex.Items.AddRange(New Object() {"男", "女"})
        Me.cbbSex.Location = New System.Drawing.Point(248, 33)
        Me.cbbSex.Name = "cbbSex"
        Me.cbbSex.Size = New System.Drawing.Size(64, 20)
        Me.cbbSex.TabIndex = 39
        '
        'cbbNature
        '
        Me.cbbNature.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.民族", True))
        Me.cbbNature.Items.AddRange(New Object() {"汉族", "壮族", "满族", "苗族", "傣族", "其他"})
        Me.cbbNature.Location = New System.Drawing.Point(10, 80)
        Me.cbbNature.Name = "cbbNature"
        Me.cbbNature.Size = New System.Drawing.Size(64, 20)
        Me.cbbNature.TabIndex = 38
        '
        'cbbCity
        '
        Me.cbbCity.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.籍贯", True))
        Me.cbbCity.Items.AddRange(New Object() {"北京", "上海", "河北", "河南", "山西", "其他"})
        Me.cbbCity.Location = New System.Drawing.Point(496, 33)
        Me.cbbCity.Name = "cbbCity"
        Me.cbbCity.Size = New System.Drawing.Size(104, 20)
        Me.cbbCity.TabIndex = 37
        '
        'TextBox17
        '
        Me.TextBox17.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.备注", True))
        Me.TextBox17.Location = New System.Drawing.Point(496, 128)
        Me.TextBox17.Name = "TextBox17"
        Me.TextBox17.Size = New System.Drawing.Size(104, 21)
        Me.TextBox17.TabIndex = 35
        '
        'TextBox16
        '
        Me.TextBox16.Location = New System.Drawing.Point(412, 128)
        Me.TextBox16.Name = "TextBox16"
        Me.TextBox16.ReadOnly = True
        Me.TextBox16.Size = New System.Drawing.Size(64, 21)
        Me.TextBox16.TabIndex = 34
        '
        'TextBox15
        '
        Me.TextBox15.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.电子邮件地址", True))
        Me.TextBox15.Location = New System.Drawing.Point(496, 80)
        Me.TextBox15.Name = "TextBox15"
        Me.TextBox15.Size = New System.Drawing.Size(104, 21)
        Me.TextBox15.TabIndex = 33
        '
        'TextBox14
        '
        Me.TextBox14.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.职工账号", True))
        Me.TextBox14.Location = New System.Drawing.Point(248, 128)
        Me.TextBox14.Name = "TextBox14"
        Me.TextBox14.Size = New System.Drawing.Size(64, 21)
        Me.TextBox14.TabIndex = 32
        '
        'TextBox13
        '
        Me.TextBox13.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.手机", True))
        Me.TextBox13.Location = New System.Drawing.Point(168, 128)
        Me.TextBox13.Name = "TextBox13"
        Me.TextBox13.Size = New System.Drawing.Size(64, 21)
        Me.TextBox13.TabIndex = 31
        '
        'TextBox11
        '
        Me.TextBox11.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.家庭电话", True))
        Me.TextBox11.Location = New System.Drawing.Point(10, 128)
        Me.TextBox11.Name = "TextBox11"
        Me.TextBox11.Size = New System.Drawing.Size(64, 21)
        Me.TextBox11.TabIndex = 30
        '
        'TextBox10
        '
        Me.TextBox10.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.身份证号码", True))
        Me.TextBox10.Location = New System.Drawing.Point(410, 80)
        Me.TextBox10.Name = "TextBox10"
        Me.TextBox10.Size = New System.Drawing.Size(64, 21)
        Me.TextBox10.TabIndex = 29
        '
        'TextBox9
        '
        Me.TextBox9.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.婚姻状况", True))
        Me.TextBox9.Location = New System.Drawing.Point(328, 80)
        Me.TextBox9.Name = "TextBox9"
        Me.TextBox9.Size = New System.Drawing.Size(64, 21)
        Me.TextBox9.TabIndex = 28
        '
        'TextBox8
        '
        Me.TextBox8.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.健康状况", True))
        Me.TextBox8.Location = New System.Drawing.Point(248, 80)
        Me.TextBox8.Name = "TextBox8"
        Me.TextBox8.Size = New System.Drawing.Size(64, 21)
        Me.TextBox8.TabIndex = 27
        '
        'TextBox7
        '
        Me.TextBox7.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.毕业学校", True))
        Me.TextBox7.Location = New System.Drawing.Point(168, 80)
        Me.TextBox7.Name = "TextBox7"
        Me.TextBox7.Size = New System.Drawing.Size(64, 21)
        Me.TextBox7.TabIndex = 26
        '
        'TextBox6
        '
        Me.TextBox6.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.文化程度", True))
        Me.TextBox6.Location = New System.Drawing.Point(89, 80)
        Me.TextBox6.Name = "TextBox6"
        Me.TextBox6.Size = New System.Drawing.Size(64, 21)
        Me.TextBox6.TabIndex = 25
        '
        'TextBox5
        '
        Me.TextBox5.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.年龄", True))
        Me.TextBox5.Location = New System.Drawing.Point(410, 33)
        Me.TextBox5.Name = "TextBox5"
        Me.TextBox5.Size = New System.Drawing.Size(64, 21)
        Me.TextBox5.TabIndex = 24
        '
        'TextBox4
        '
        Me.TextBox4.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.出生日期", True))
        Me.TextBox4.Location = New System.Drawing.Point(328, 33)
        Me.TextBox4.Name = "TextBox4"
        Me.TextBox4.Size = New System.Drawing.Size(64, 21)
        Me.TextBox4.TabIndex = 23
        '
        'TextBox3
        '
        Me.TextBox3.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.姓名简码", True))
        Me.TextBox3.Location = New System.Drawing.Point(168, 33)
        Me.TextBox3.Name = "TextBox3"
        Me.TextBox3.Size = New System.Drawing.Size(64, 21)
        Me.TextBox3.TabIndex = 22
        '
        'TextBox2
        '
        Me.TextBox2.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.DataSet11, "职员基本信息表.姓名", True))
        Me.TextBox2.Location = New System.Drawing.Point(89, 33)
        Me.TextBox2.Name = "TextBox2"
        Me.TextBox2.Size = New System.Drawing.Size(64, 21)

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?