函数返回Byref

时间:2012-01-18 01:57:40

标签: vb.net function

函数是否可以返回值byref而不是默认值byval?也就是说,允许我直接编辑它正在检索的变量,而不是仅仅给我一个该变量的副本。

现在我正在尝试根据用户通过组合框选择的特定设置(例如,My.Settings.somethingHere)来编写将返回的函数。然后我希望能够通过调用函数直接编辑设置。那可能吗?

private function myFunction() as byte
  select case comboBox1.text
     case "a"
       return my.settings.a
     case "b"
       return my.settings.b
  end select
end function

private sub something()
  myFunction() -= 1
end sub

1 个答案:

答案 0 :(得分:1)

Function can't return字节的引用,您可以创建属性(可写)来赋值。

 Public WriteOnly Property Change As SByte
        Set(value As SByte)
            Select Case comboBox1.text
                Case "a"
                    My.Settings.a = value
                Case "b"
                    My.Settings.b = value
            End Select
        End Set
 End Property

并为Change属性赋值

private sub something()
  Change -= 1
end sub