连接 2 个变量

Question

我怎样才能让这段代码正常工作？

Dim c As Integer = 0
For iCol = 0 To reader.FieldCount
    Dim col+c As String = reader.GetName(iCol))
    c = c + 1
Next

谢谢

Answer 1

这是我的代码：

Dim growingArray() As String = Nothing
For iCol = 0 To reader.FieldCount - 1
    ReDim Preserve growingArray(iCol)
    growingArray(iCol) = reader.GetName(iCol)
Next

来源：http://www.java2s.com/Tutorial/VB/0160__Collections/UseReDimPreservetoaddelementstoanarray.htm

感谢 SSS

Answer 2

您也可以使用 List<String>：

Dim lst as new List<String>();
For iCol = 0 To reader.FieldCount - 1
    lst.Add(reader.GetName(iCol));
Next

Answer 3

Dim list as new List<String>(reader.FieldCount);
For iCol = 0 To reader.FieldCount - 1
    list.Add(reader.GetName(iCol));
Next

这是对所选答案的改进，因为它使用与字段数匹配的容量初始化列表。

见https://msdn.microsoft.com/en-us/library/dw8e0z9z(v=vs.110).aspx

连接 2 个变量

Concatenate 2 variables

vb.net

concatenation