Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/14.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

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/url/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 将For Next循环转换为For Each循环_Vb.net - Fatal编程技术网

Vb.net 将For Next循环转换为For Each循环

Vb.net 将For Next循环转换为For Each循环,vb.net,Vb.net,将以下For Next循环转换为For Each循环: Dim TeamString(31) As String For CounterInteger as Integer = 0 to 31 MessageBox.Show("Team Name:" & TeamString(CounterInteger)) Next 注释的开头很好,但是数组中的是字符串而不是整数,所以可以循环字符串 Dim TeamString(31) As String For E

将以下For Next循环转换为For Each循环:

Dim TeamString(31) As String

For CounterInteger as Integer = 0 to 31

    MessageBox.Show("Team Name:" & TeamString(CounterInteger))

Next

注释的开头很好,但是数组中的是字符串而不是整数,所以可以循环字符串

Dim TeamString(31) As String

        For Each Team As String In TeamString

            MessageBox.Show("Team Name:" & Team)

        Next

将以下For Next循环转换为For Each循环::否!选中此选项,然后尝试使用VBA或VB.NET编写代码?我使用VB.NET编写代码。这似乎正确吗?对于TeamString MessageBox.Show-Next CounterIntegerId中作为整数的每个CounterInteger,它应该做什么?