选择多个单元格并添加分隔符

Question

我有这个专栏：

Reference
ref01
ref02
ref03

我想得到每个引用并将它与一个分隔符（，）组合成字符串，就像这个预期的输出： 的 'REF01'， 'REF02'， 'REF03'

顺便说一句，这是我的代码：

 For Each .Item("Reference") In DataGridView1
    RefList = RefList & "'" & .Item("Reference") & "', "
    Next
    MsgBox(RefList.Substring(0, RefList.Length - 2))

谢谢你！

Answer 1

我建议使用ListOf(String) ...您可以遍历DataGridView并获取所需的项目并将其添加到列表中。然后使用String.Join将它们粘合在一起。

Dim strList As New List(Of String)
For Each row As DataGridViewRow In DataGridView1.Rows
  If Not row.IsNewRow Then
    strList.Add("'" & row.Cells("Reference").Value & "'")    
  End If
Next
If strList.Count > 0 Then
  Dim strRes = String.Join(",", strList.ToArray)
  MsgBox(strRes)
End If