excel里的VB语句怎么写?
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/04/29 05:54:40
excel里的VB语句怎么写?
定义一个过程Bonus,在该过程内部定义三个long型变量:performance,salary,Bonus,设salary=5000.
用InputBox 函数:请求用户输入:“请输入performance 的值:”,并赋值给performance,根据以下规则来计算Bonus:
如果performance = 1 则Bonus = salary * 0.1
如果performance = 2 则Bonus = salary * 0.09
如果 performance = 3 Then Bonus = salary * 0.07
否则Bonus = 0
并将结果用Msgbox显示.
定义一个过程Bonus,在该过程内部定义三个long型变量:performance,salary,Bonus,设salary=5000.
用InputBox 函数:请求用户输入:“请输入performance 的值:”,并赋值给performance,根据以下规则来计算Bonus:
如果performance = 1 则Bonus = salary * 0.1
如果performance = 2 则Bonus = salary * 0.09
如果 performance = 3 Then Bonus = salary * 0.07
否则Bonus = 0
并将结果用Msgbox显示.
Sub ply()
Dim performance As Long
Dim salary As Long
Dim Bonus As Long
salary = 5000
performance = InputBox("请输入performance 的值:")
If performance = 1 Then
Bonus = salary * 0.1
ElseIf performance = 2 Then
Bonus = salary * 0.09
ElseIf performance = 3 Then
Bonus = salary * 0.07
Else
Bonus = 0
End If
MsgBox Bonus
End Sub
测试成功!
张志晨
Dim performance As Long
Dim salary As Long
Dim Bonus As Long
salary = 5000
performance = InputBox("请输入performance 的值:")
If performance = 1 Then
Bonus = salary * 0.1
ElseIf performance = 2 Then
Bonus = salary * 0.09
ElseIf performance = 3 Then
Bonus = salary * 0.07
Else
Bonus = 0
End If
MsgBox Bonus
End Sub
测试成功!
张志晨
excel 里面if语句的双重判定条件怎么写
excel 里面sumif语句的双重判定条件怎么写
VB程序里的循环结构怎么写?
VB能生成三位数的整数随机数的语句 怎么写
VB中循环语句until的条件是单击了button,怎么写
用VB的do...loop循环写语句!
请问用递归法怎样写VB语句?还有 VB中的递归法是怎样的?
vb 如select * from a where b=' "+###1+" '的语句怎么写才可以筛选两个词
excel 的正切公式怎么写?我想在excel里写一个角度然后用excel算出正切值
excel IF语句两类多重判断条件怎么写?
求VB的循环语句
要核对两列的数据是否完全一样,EXCEL里的IF语句是怎么用的?