Question

这似乎是一个非常简单的问题，但我无法在任何地方找到答案。我想我觉得我在VB很不错但是前几天我在学习javascript时发现了一些看起来很棒的东西，现在我无法弄清楚如何在VB中做到这一点。

在javascript中它看起来像这样：

var someValue = getThatValue（）

它都是从getThatValue（）子句调用和设置值。什么是VB等价物？

修改

我试过这样做：

   private sub main()
       dim value = getValue()
       'do something with value
   end sub

   private sub getValue()
       return 3
   end sub

这似乎不起作用，我怎么能让它工作？

Answer 1

Private Sub Main()
    Dim value = getValue()
    'do something with value
End Sub

Private Function getValue() As Integer
    Return 3
End Function

Answer 2

你应该使用一个属性：

Private _myValue As String
Public Property MyValue As String
    Get
        Return _myValue
    End Get
    Set(value As String)
        _myValue = value
     End Set
End Property

然后像这样使用它：

MyValue = "Hello"
Console.write(MyValue)

Answer 3

Sub 不返回值，function 没有副作用。

有时您需要副作用和返回值。

一旦你知道 VBA 默认通过引用传递参数，这很容易做到，这样你就可以用这种方式编写代码：

Sub getValue(retValue as Long)
    ...
    retValue = 42 
End SUb 

Sub Main()
    Dim retValue As Long
    getValue retValue 
    ... 
End SUb

调用Sub并返回值

修改

3 个答案: