Question

我很难找到答案，用这样的通用术语，我的问题可能仍然难以解析。我有一些代码，其中一个变量表示剩余的可用磁盘空间量百分比。我想把它称为一个函数，我在消息中使用反向量给用户，即使用的空间量。我可以在函数调用中做一些数学运算吗？

Public Sub MyApp()
    Dim nFreeSpace As Integer
    nFreeSpace = GetFreeSpace
    DisplayUsedSpace 100 - nFreeSpace 'Is this valid?
End Sub
Private Function DisplayUsedSpace(ByVal nUsedSpace As Integer) As Boolean
    MsgBox("You have used " & nUsedSpace & "% of your disk drive space.")
End Function

Answer 1

是的，这是有效的。虽然，我可能会把它写成这个

Call DisplayUsedSpace(100 - nFreeSpace)

但是，你的代码也可以正常工作。

Answer 2

当然你可以 - VB将首先计算表达式。

您也可以在通话前将其撤消

Public Sub MyApp()
    Dim nUsedSpace As Integer
    nUsedSpace = 100 - GetFreeSpace
    DisplayUsedSpace nUsedSpace
End Sub

如果你想要它非常紧凑：

Public Sub MyApp()
    Call DisplayUsedSpace(100 - GetFreeSpace)
End Sub

在VB6中，是否可以在参数中调用带有运算符的函数？

2 个答案: