Question

VB判断语句,求思路?某公司员工定额是1000件,单价：0.1元/件,超出1000件,按照超额：0.12元每件.如果没超

Answer 1

你的描述太乱了,看不懂,还是看我的吧

定额.Text = Val(定额单价.Text) * Iif(Val(定额数.Text) < Val(实际完成数.Text), Val(定额数.Text), Val(实际完成数.Text))

超额.Text = Val(超额单价.Text) * Iif(Val(实际完成数.Text) - Val(定额数.Text) > 0, Val(实际完成数.Text) - Val(定额数.Text), 0)

合计.Text = Val(定额.Text) + Val(超额.Text)

自己将汉字换成对应的控件名吧.