Function nihe(x, z)
'x:拟合对象
'y:暂时不用
'z:0时显示整数部分,1显示小数部分
Dim a, b, c, m, n, i, j
a = Int(x) '整数部分
b = x - a '小数部分
If z = 0 Then
nihe = a
ElseIf z = 1 Then
nihe = b
Else
nihe = "N/A"
End If
End Function
VBA 自定义函数问题
VBA 自定义函数问题
我想弄个简单的自定义函数练习练习,但是出错了.
Function nihe(x,y,z)
'x:拟合对象
'y:暂时不用
'z:0时显示整数部分,1显示小数部分
Dim a,b,c,m,n,i,j
a = Int(x) '整数部分
b = x - a '小数部分
nihe(x,y,0) = a
nihe(x,y,1) = b
End Function
我想弄个简单的自定义函数练习练习,但是出错了.
Function nihe(x,y,z)
'x:拟合对象
'y:暂时不用
'z:0时显示整数部分,1显示小数部分
Dim a,b,c,m,n,i,j
a = Int(x) '整数部分
b = x - a '小数部分
nihe(x,y,0) = a
nihe(x,y,1) = b
End Function
其他人气:607 ℃时间:2020-06-14 08:51:11
优质解答
我来回答
类似推荐
猜你喜欢
- 1关于学会生存的故事50字
- 2小明读一本书,已经读了四分之一,如果再读15页,则读过的页数与未读的页数比是2:3,这本书有多少页?
- 3630除以42的简便计算怎么写
- 4一项工程,甲单独做要10天完成,乙单独做要15天完成,两人合作四天后,剩下的部分由乙单独做,还需要几...
- 5Please wait a moment,Jim.同义句转换Please___ ___ ___,Jim.
- 6Five students in our class come fom Beijing are from Tianjin.
- 71加2分之一等于几?
- 81、为什么商品价值和社会生产率成反比?2、为什么价格对于需求量的变化图中生活必需
- 93,乙数比甲数少30,甲数是多少
- 10有关成长的比喻句