⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 frmsalarymanage.vb

📁 使用的人力资源管理系统
💻 VB
📖 第 1 页 / 共 5 页
字号:
        Me.Label1.Text = "基本工资"
        '
        'SqlDataAdapter1
        '
        Me.SqlDataAdapter1.DeleteCommand = Me.SqlDeleteCommand1
        Me.SqlDataAdapter1.InsertCommand = Me.SqlInsertCommand1
        Me.SqlDataAdapter1.SelectCommand = Me.SqlSelectCommand1
        Me.SqlDataAdapter1.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "月工资统计表", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("基本工资", "基本工资"), New System.Data.Common.DataColumnMapping("浮动工资", "浮动工资"), New System.Data.Common.DataColumnMapping("合同补", "合同补"), New System.Data.Common.DataColumnMapping("粮副补", "粮副补"), New System.Data.Common.DataColumnMapping("房补", "房补"), New System.Data.Common.DataColumnMapping("临时补", "临时补"), New System.Data.Common.DataColumnMapping("职务工资", "职务工资"), New System.Data.Common.DataColumnMapping("工龄工资", "工龄工资"), New System.Data.Common.DataColumnMapping("考核工资", "考核工资"), New System.Data.Common.DataColumnMapping("奖金", "奖金"), New System.Data.Common.DataColumnMapping("房租", "房租"), New System.Data.Common.DataColumnMapping("水电费", "水电费"), New System.Data.Common.DataColumnMapping("请假扣除", "请假扣除"), New System.Data.Common.DataColumnMapping("考勤扣除", "考勤扣除"), New System.Data.Common.DataColumnMapping("罚款", "罚款"), New System.Data.Common.DataColumnMapping("住房公积金", "住房公积金"), New System.Data.Common.DataColumnMapping("医疗保险", "医疗保险"), New System.Data.Common.DataColumnMapping("养老保险", "养老保险"), New System.Data.Common.DataColumnMapping("失业保险", "失业保险"), New System.Data.Common.DataColumnMapping("生育保险", "生育保险"), New System.Data.Common.DataColumnMapping("工伤保险", "工伤保险"), New System.Data.Common.DataColumnMapping("职员编号", "职员编号")})})
        Me.SqlDataAdapter1.UpdateCommand = Me.SqlUpdateCommand1
        '
        'SqlDeleteCommand1
        '
        Me.SqlDeleteCommand1.CommandText = "DELETE FROM 月工资统计表 WHERE (职员编号 = @Original_职员编号) AND (临时补 = @Original_临时补 OR @Ori" & _
        "ginal_临时补 IS NULL AND 临时补 IS NULL) AND (住房公积金 = @Original_住房公积金 OR @Original_住房公" & _
        "积金 IS NULL AND 住房公积金 IS NULL) AND (养老保险 = @Original_养老保险 OR @Original_养老保险 IS NU" & _
        "LL AND 养老保险 IS NULL) AND (医疗保险 = @Original_医疗保险 OR @Original_医疗保险 IS NULL AND 医疗" & _
        "保险 IS NULL) AND (合同补 = @Original_合同补 OR @Original_合同补 IS NULL AND 合同补 IS NULL) A" & _
        "ND (基本工资 = @Original_基本工资 OR @Original_基本工资 IS NULL AND 基本工资 IS NULL) AND (失业保险 " & _
        "= @Original_失业保险 OR @Original_失业保险 IS NULL AND 失业保险 IS NULL) AND (奖金 = @Original" & _
        "_奖金 OR @Original_奖金 IS NULL AND 奖金 IS NULL) AND (工伤保险 = @Original_工伤保险 OR @Origi" & _
        "nal_工伤保险 IS NULL AND 工伤保险 IS NULL) AND (工龄工资 = @Original_工龄工资 OR @Original_工龄工资 " & _
        "IS NULL AND 工龄工资 IS NULL) AND (房租 = @Original_房租 OR @Original_房租 IS NULL AND 房租 " & _
        "IS NULL) AND (房补 = @Original_房补 OR @Original_房补 IS NULL AND 房补 IS NULL) AND (水电费" & _
        " = @Original_水电费 OR @Original_水电费 IS NULL AND 水电费 IS NULL) AND (浮动工资 = @Original" & _
        "_浮动工资 OR @Original_浮动工资 IS NULL AND 浮动工资 IS NULL) AND (生育保险 = @Original_生育保险 OR " & _
        "@Original_生育保险 IS NULL AND 生育保险 IS NULL) AND (粮副补 = @Original_粮副补 OR @Original_粮" & _
        "副补 IS NULL AND 粮副补 IS NULL) AND (罚款 = @Original_罚款 OR @Original_罚款 IS NULL AND 罚" & _
        "款 IS NULL) AND (考勤扣除 = @Original_考勤扣除 OR @Original_考勤扣除 IS NULL AND 考勤扣除 IS NULL" & _
        ") AND (考核工资 = @Original_考核工资 OR @Original_考核工资 IS NULL AND 考核工资 IS NULL) AND (职务" & _
        "工资 = @Original_职务工资 OR @Original_职务工资 IS NULL AND 职务工资 IS NULL) AND (请假扣除 = @Ori" & _
        "ginal_请假扣除 OR @Original_请假扣除 IS NULL AND 请假扣除 IS NULL)"
        Me.SqlDeleteCommand1.Connection = Me.SqlConnection1
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_职员编号", System.Data.SqlDbType.VarChar, 30, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "职员编号", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_临时补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "临时补", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_住房公积金", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "住房公积金", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_养老保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "养老保险", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_医疗保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "医疗保险", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_合同补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "合同补", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_基本工资", System.Data.SqlDbType.Float, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "基本工资", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_失业保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "失业保险", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_奖金", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "奖金", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_工伤保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "工伤保险", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_工龄工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "工龄工资", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_房租", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "房租", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_房补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "房补", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_水电费", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "水电费", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_浮动工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "浮动工资", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_生育保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "生育保险", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_粮副补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "粮副补", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_罚款", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "罚款", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_考勤扣除", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "考勤扣除", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_考核工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "考核工资", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_职务工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "职务工资", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlDeleteCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_请假扣除", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "请假扣除", System.Data.DataRowVersion.Original, Nothing))
        '
        'SqlConnection1
        '
        Me.SqlConnection1.ConnectionString = "workstation id=CS;packet size=4096;integrated security=SSPI;data source=CS;persis" & _
        "t security info=False;initial catalog=hrmbook"
        '
        'SqlInsertCommand1
        '
        Me.SqlInsertCommand1.CommandText = "INSERT INTO 月工资统计表(基本工资, 浮动工资, 合同补, 粮副补, 房补, 临时补, 职务工资, 工龄工资, 考核工资, 奖金, 房租, 水电费, " & _
        "请假扣除, 考勤扣除, 罚款, 住房公积金, 医疗保险, 养老保险, 失业保险, 生育保险, 工伤保险, 职员编号) VALUES (@基本工资, @浮动工资," & _
        " @合同补, @粮副补, @房补, @临时补, @职务工资, @工龄工资, @考核工资, @奖金, @房租, @水电费, @请假扣除, @考勤扣除, @罚款, " & _
        "@住房公积金, @医疗保险, @养老保险, @失业保险, @生育保险, @工伤保险, @职员编号); SELECT 基本工资, 浮动工资, 合同补, 粮副补, " & _
        "房补, 临时补, 职务工资, 工龄工资, 考核工资, 奖金, 房租, 水电费, 请假扣除, 考勤扣除, 罚款, 住房公积金, 医疗保险, 养老保险, 失业保险," & _
        " 生育保险, 工伤保险, 职员编号 FROM 月工资统计表 WHERE (职员编号 = @职员编号)"
        Me.SqlInsertCommand1.Connection = Me.SqlConnection1
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@基本工资", System.Data.SqlDbType.Float, 8, "基本工资"))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@浮动工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "浮动工资", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@合同补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "合同补", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@粮副补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "粮副补", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@房补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "房补", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@临时补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "临时补", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@职务工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "职务工资", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@工龄工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "工龄工资", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@考核工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "考核工资", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@奖金", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "奖金", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@房租", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "房租", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@水电费", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "水电费", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@请假扣除", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "请假扣除", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@考勤扣除", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "考勤扣除", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@罚款", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "罚款", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@住房公积金", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "住房公积金", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@医疗保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "医疗保险", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@养老保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "养老保险", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@失业保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "失业保险", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@生育保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "生育保险", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@工伤保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "工伤保险", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@职员编号", System.Data.SqlDbType.VarChar, 30, "职员编号"))
        '
        'SqlSelectCommand1
        '
        Me.SqlSelectCommand1.CommandText = "SELECT 基本工资, 浮动工资, 合同补, 粮副补, 房补, 临时补, 职务工资, 工龄工资, 考核工资, 奖金, 房租, 水电费, 请假扣除, 考勤扣除, " & _
        "罚款, 住房公积金, 医疗保险, 养老保险, 失业保险, 生育保险, 工伤保险, 职员编号 FROM 月工资统计表"
        Me.SqlSelectCommand1.Connection = Me.SqlConnection1
        '
        'SqlUpdateCommand1
        '
        Me.SqlUpdateCommand1.CommandText = "UPDATE 月工资统计表 SET 基本工资 = @基本工资, 浮动工资 = @浮动工资, 合同补 = @合同补, 粮副补 = @粮副补, 房补 = @房补, 临" & _
        "时补 = @临时补, 职务工资 = @职务工资, 工龄工资 = @工龄工资, 考核工资 = @考核工资, 奖金 = @奖金, 房租 = @房租, 水电费 = @" & _
        "水电费, 请假扣除 = @请假扣除, 考勤扣除 = @考勤扣除, 罚款 = @罚款, 住房公积金 = @住房公积金, 医疗保险 = @医疗保险, 养老保险 = " & _
        "@养老保险, 失业保险 = @失业保险, 生育保险 = @生育保险, 工伤保险 = @工伤保险, 职员编号 = @职员编号 WHERE (职员编号 = @Ori" & _
        "ginal_职员编号) AND (临时补 = @Original_临时补 OR @Original_临时补 IS NULL AND 临时补 IS NULL) A" & _
        "ND (住房公积金 = @Original_住房公积金 OR @Original_住房公积金 IS NULL AND 住房公积金 IS NULL) AND (养" & _
        "老保险 = @Original_养老保险 OR @Original_养老保险 IS NULL AND 养老保险 IS NULL) AND (医疗保险 = @Or" & _
        "iginal_医疗保险 OR @Original_医疗保险 IS NULL AND 医疗保险 IS NULL) AND (合同补 = @Original_合同补" & _
        " OR @Original_合同补 IS NULL AND 合同补 IS NULL) AND (基本工资 = @Original_基本工资 OR @Origin" & _
        "al_基本工资 IS NULL AND 基本工资 IS NULL) AND (失业保险 = @Original_失业保险 OR @Original_失业保险 I" & _
        "S NULL AND 失业保险 IS NULL) AND (奖金 = @Original_奖金 OR @Original_奖金 IS NULL AND 奖金 I" & _
        "S NULL) AND (工伤保险 = @Original_工伤保险 OR @Original_工伤保险 IS NULL AND 工伤保险 IS NULL) A" & _
        "ND (工龄工资 = @Original_工龄工资 OR @Original_工龄工资 IS NULL AND 工龄工资 IS NULL) AND (房租 = " & _
        "@Original_房租 OR @Original_房租 IS NULL AND 房租 IS NULL) AND (房补 = @Original_房补 OR @" & _
        "Original_房补 IS NULL AND 房补 IS NULL) AND (水电费 = @Original_水电费 OR @Original_水电费 IS" & _
        " NULL AND 水电费 IS NULL) AND (浮动工资 = @Original_浮动工资 OR @Original_浮动工资 IS NULL AND " & _
        "浮动工资 IS NULL) AND (生育保险 = @Original_生育保险 OR @Original_生育保险 IS NULL AND 生育保险 IS N" & _
        "ULL) AND (粮副补 = @Original_粮副补 OR @Original_粮副补 IS NULL AND 粮副补 IS NULL) AND (罚款 " & _
        "= @Original_罚款 OR @Original_罚款 IS NULL AND 罚款 IS NULL) AND (考勤扣除 = @Original_考勤扣" & _
        "除 OR @Original_考勤扣除 IS NULL AND 考勤扣除 IS NULL) AND (考核工资 = @Original_考核工资 OR @Ori" & _
        "ginal_考核工资 IS NULL AND 考核工资 IS NULL) AND (职务工资 = @Original_职务工资 OR @Original_职务工" & _
        "资 IS NULL AND 职务工资 IS NULL) AND (请假扣除 = @Original_请假扣除 OR @Original_请假扣除 IS NULL" & _
        " AND 请假扣除 IS NULL); SELECT 基本工资, 浮动工资, 合同补, 粮副补, 房补, 临时补, 职务工资, 工龄工资, 考核工资, 奖金, " & _
        "房租, 水电费, 请假扣除, 考勤扣除, 罚款, 住房公积金, 医疗保险, 养老保险, 失业保险, 生育保险, 工伤保险, 职员编号 FROM 月工资统计表 W" & _
        "HERE (职员编号 = @职员编号)"
        Me.SqlUpdateCommand1.Connection = Me.SqlConnection1
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@基本工资", System.Data.SqlDbType.Float, 8, "基本工资"))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@浮动工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "浮动工资", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@合同补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "合同补", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@粮副补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "粮副补", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@房补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "房补", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@临时补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "临时补", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@职务工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "职务工资", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@工龄工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "工龄工资", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@考核工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "考核工资", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@奖金", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "奖金", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@房租", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "房租", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@水电费", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "水电费", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@请假扣除", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "请假扣除", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@考勤扣除", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "考勤扣除", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@罚款", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "罚款", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@住房公积金", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "住房公积金", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@医疗保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "医疗保险", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@养老保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "养老保险", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@失业保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "失业保险", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@生育保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "生育保险", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@工伤保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "工伤保险", System.Data.DataRowVersion.Current, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@职员编号", System.Data.SqlDbType.VarChar, 30, "职员编号"))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_职员编号", System.Data.SqlDbType.VarChar, 30, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "职员编号", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_临时补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "临时补", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_住房公积金", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "住房公积金", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_养老保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "养老保险", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_医疗保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "医疗保险", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_合同补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "合同补", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_基本工资", System.Data.SqlDbType.Float, 8, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "基本工资", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_失业保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "失业保险", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_奖金", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "奖金", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_工伤保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "工伤保险", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_工龄工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "工龄工资", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_房租", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "房租", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_房补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "房补", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_水电费", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "水电费", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_浮动工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "浮动工资", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_生育保险", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "生育保险", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_粮副补", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "粮副补", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_罚款", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "罚款", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_考勤扣除", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "考勤扣除", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_考核工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "考核工资", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_职务工资", System.Data.SqlDbType.Decimal, 13, System.Data.ParameterDirection.Input, False, CType(26, Byte), CType(2, Byte), "职务工资", System.Data.DataRowVersion.Original, Nothing))
        Me.SqlUpdateCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_请假扣除", System.Data

⌨️ 快捷键说明

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