高分求asp高手作答
答案:1 悬赏:40 手机版
解决时间 2021-03-11 23:23
- 提问者网友：呐年旧曙光
- 2021-03-11 00:46
高分求asp高手作答
最佳答案
- 五星知识达人网友：三千妖杀
- 2021-03-11 01:30
<%
Function GetMoney(weight)
If Not IsNumeric(weight) Or IsNull(weight) Then
GetMoney=0
Exit Function
End If
Dim W
W=weight
If weight<=50 Then
GetMoney=W*.25
ElseIf weight>50 And weight<=100 Then
GetMoney=W*.25
GetMoney=GetMoney+(W-50)*.35
ElseIf weight>100 Then
GetMoney=50*.25
W=W-50
GetMoney=GetMoney+W*.35
W=W-50
GetMoney=GetMoney+W*.45
End If
End Function
Response.Write GetMoney(101)
%>
输出 30.8看对不对
Function GetMoney(weight)
If Not IsNumeric(weight) Or IsNull(weight) Then
GetMoney=0
Exit Function
End If
Dim W
W=weight
If weight<=50 Then
GetMoney=W*.25
ElseIf weight>50 And weight<=100 Then
GetMoney=W*.25
GetMoney=GetMoney+(W-50)*.35
ElseIf weight>100 Then
GetMoney=50*.25
W=W-50
GetMoney=GetMoney+W*.35
W=W-50
GetMoney=GetMoney+W*.45
End If
End Function
Response.Write GetMoney(101)
%>
输出 30.8看对不对
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯