excel里的VB语句怎么写?定义一个过程Bonus,在该过程内部定义三个long型变量:performance,salary,Bonus,设salary=5000.用InputBox 函数:请求用户输入:“请输入performance 的值:”,并赋值给performance,根据

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/02 14:09:11
excel里的VB语句怎么写?定义一个过程Bonus,在该过程内部定义三个long型变量:performance,salary,Bonus,设salary=5000.用InputBox 函数:请求用户输入:“请输入performance 的值:”,并赋值给performance,根据

excel里的VB语句怎么写?定义一个过程Bonus,在该过程内部定义三个long型变量:performance,salary,Bonus,设salary=5000.用InputBox 函数:请求用户输入:“请输入performance 的值:”,并赋值给performance,根据
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显示.

excel里的VB语句怎么写?定义一个过程Bonus,在该过程内部定义三个long型变量:performance,salary,Bonus,设salary=5000.用InputBox 函数:请求用户输入:“请输入performance 的值:”,并赋值给performance,根据
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
测试成功!
张志晨

excel里的VB语句怎么写?定义一个过程Bonus,在该过程内部定义三个long型变量:performance,salary,Bonus,设salary=5000.用InputBox 函数:请求用户输入:“请输入performance 的值:”,并赋值给performance,根据 VB里的iff语句怎么写?举个简单的例子. VB的grid控件 VB的grid控件 VB的grid控件我想把grid控件里面的数据(access)插入到另外一个数据库(oracle)里,用SQL语句怎么写其实也可以这样,在access数据库里的数据表,插入到oracle数据库的数据表, excel 的正切公式怎么写?我想在excel里写一个角度然后用excel算出正切值 计算圆的面积 VB代码,就是VB里怎么计算圆的面积.用if语句,可以不. VB定义函数问题我想把函数定义在一个程序里面的IF里面 .这个定义在该怎么写啊? vb.net定义一个函数,private a ()括号里如何定义可有可无的参数? VB能生成三位数的整数随机数的语句 怎么写 输入一些英文语句,使每个单词的第一个字母变成大写VB写 VB中循环语句until的条件是单击了button,怎么写 VB里变量怎么定义长整形或实数类型 写一个宏语句对excel表格进行操作宏语句的作用如下:excel里有sheet1和sheet2.写一个if语句将sheet1中的第2行第i列和sheet2中的第j行第2列进行比较,如果这两个数一样的话,就将sheet2的第j行第3列的 VB变量定义问题怎么将VB里的变量设置为四舍五入,怎么才能让变量在所有的地方都可以用? vb里的 rem是定义的什么啊 vb写一个语句,将sin56(度)的值存入单精度的变量x中(圆周率取3.14) 求VB的循环语句 matlab里的case语句多少到多少怎么写 vb 如select * from a where b=' +###1+ '的语句怎么写才可以筛选两个词只写一个时可以and OR 不行哦 有语法错误 难道是我哪里写错了