主题：[求助]如何从一组字符串数组中获取不重复的值，并排除空值

这个用字典解决

Dim str() As String = {"A","A","B","","C"}

Dim i As Integer
Dim zd As New Dictionary(Of Integer, String)
For i = 0 To str.length-1
If zd.ContainsValue(str(i)) = False And str(i) <> "" Then '是否存在值
    zd.add(i,str(i))
End If

Next

For Each v As String In zd.Values '显示所有值
    Output.Show(v)
Next

连成字符串用string.join()