Warning: file_get_contents(/data/phpspider/zhask/data//catemap/8/variables/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
作为参数传递时更改变量值(vb.net)_Vb.net_Variables - Fatal编程技术网

作为参数传递时更改变量值(vb.net)

作为参数传递时更改变量值(vb.net),vb.net,variables,Vb.net,Variables,在vb.net中有这样的方法吗 dim idx = -1 dim a = array(idx = idx + 1) dim b = array(idx = idx + 1) dim c = array(idx = idx + 1) dim d = array(idx = idx + 1) 我想要的是idx在每一行之后不断递增,而不是在单独的一行上递增 谢谢你我认为VB.Net没有类似的功能,但是你可以做一个扩展来接近它: Imports System.Runtime.CompilerServi

在vb.net中有这样的方法吗

dim idx = -1
dim a = array(idx = idx + 1)
dim b = array(idx = idx + 1)
dim c = array(idx = idx + 1)
dim d = array(idx = idx + 1)
我想要的是idx在每一行之后不断递增,而不是在单独的一行上递增


谢谢你

我认为VB.Net没有类似的功能,但是你可以做一个扩展来接近它:

Imports System.Runtime.CompilerServices

Public Module Module1

  <Extension()> _
  Public Function UpIndex(ByRef value As Integer) As Integer
    value += 1
    return value
  End Function

End Module

您可以在前面使用
++idx
向它添加1,例如
dim a=array(++idx)
看到这一点,我不认为VB.net支持+++=1将是等同于+++dim a=array(idx+=1)的VB提供语法错误的好主意。清除代码:),但它应该是返回值(byref)
Dim a = array(idx.UpIndex)
Dim b = array(idx.UpIndex)