Question

我当然是一个愚蠢的问题，但找不到答案。

是否有一种方法可以使用“For i = ... To ...”和非连续数字。

让我解释一下：例如，我有这行代码：

GridView1.Columns(26).BackColor = System.Drawing.Color.Green
GridView1.Columns(27).BackColor = System.Drawing.Color.Green
GridView1.Columns(28).BackColor = System.Drawing.Color.Green
GridView1.Columns(34).BackColor = System.Drawing.Color.Green
GridView1.Columns(35).BackColor = System.Drawing.Color.Green
GridView1.Columns(41).BackColor = System.Drawing.Color.Green
GridView1.Columns(42).BackColor = System.Drawing.Color.Green
'And so on...

有没有办法写From i=26 To 42 In {26,27,28,34,35,41,42}？

由于

Answer 1

只需创建一个内容为{26, 27, 28, 34, 35, 41, 42}的数组或整数列表，然后使用For Each...Next语句迭代该数组。

例如，您可以修改此示例，该示例出现在链接的MSDN文章中。它是关于String的列表，但您可以对整数执行相同的操作。

' Create a list of strings by using a 
' collection initializer.     
Dim lst As New List(Of String) _
    From {"abc", "def", "ghi"}

' Iterate through the list. 
For Each item As String In lst
    Debug.Write(item & " ")
Next

使用“For ... Next”和非连续数字

1 个答案: