使用函数来确定价格

时间:2018-03-05 00:26:58

标签: vb.net vba

不确定如何启动此功能或者我是否正确地执行此操作,但我需要使用一个函数来确定项目的价格,然后再添加任何其他功能。

Private Function WithoutCharge() As Double

    Return 150

End Function

我现在有什么,但似乎太容易了。 150它将返回的数字或原始项目的价格没有添加任何功能。那是真的有它还是我完全错了?

编辑:刚刚意识到我需要3个不同的价格/费用。 150,200,300。我如何在一个功能中做3种不同的价格,或者我应该为它做3个不同的功能?

1 个答案:

答案 0 :(得分:0)

只需将返回值设置为函数名称 - 在您的情况下为WithoutCharge

Private Function WithoutCharge() As Double

    WithoutCharge = 150

End Function

但是如果你不想进行任何计算以得出这个数字,我根本不会使用函数,而是使用常量。

Const WithoutCharge As Double = 150

编辑:在回复OP's comment时,您当然可以添加一个If语句来检查函数中的条件:

Private Function WithoutCharge() As Double

    If radlow.Checked Then
        WithoutCharge = 150
    ElseIf .... Then
        WithoutCharge = 200
    Else
        WithoutCharge = 300
    End If

End Function