
Private Sub btnCalculate_Click()
Dim BasicPay As Double, Bonus As Double, Deductions As Double
BasicPay = CDbl(txtBasicPay.Text)
Bonus = CDbl(txtBonus.Text)
Deductions = CDbl(txtDeductions.Text)
txtTotalSalary.Text = CalculateSalary(BasicPay, Bonus, Deductions)
End Sub
利唐i人事HR社区,发布者:hi_ihr,转转请注明出处:https://www.ihr360.com/hrnews/20241236781.html
