Vb.net 函数返回Byref

Vb.net 函数返回Byref,vb.net,function,Vb.net,Function,函数能否返回byref值而不是默认byval值?也就是说,允许我直接编辑它正在检索的变量,而不只是给我该变量的副本 现在我正在尝试编写一个函数,该函数将根据用户通过组合框选择的内容返回特定设置(例如My.Settings.somethingHere)。然后,我希望能够通过调用函数直接编辑设置。有可能吗 private function myFunction() as byte select case comboBox1.text case "a" return my.

函数能否返回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
您可以创建属性(可写)来赋值

 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
并赋值以更改属性

private sub something()
  Change -= 1
end sub
您可以创建属性(可写)来赋值

 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
并赋值以更改属性

private sub something()
  Change -= 1
end sub

这需要一个指针,通常托管代码不支持它,VB.NET完全不支持它。此代码的一个简单替代方法是
Sub AdjustSetting(ByVal adjustment As Integer)
,它需要一个指针,在托管代码中通常不受支持,在VB.NET中完全不受支持。此代码的一个简单替代方法是
子调整设置(ByVal调整为整数)