RichTextBox输出和删除重复项的类型

Question

我正在尝试使一个小的VB程序从纯文本中删除重复的行和空行。
我有RichTextBox输入，但最终我不知道什么类型的返回对象是，它是一个数组或列表也许？

而且我试图找到最有效的方法来移除大纯文本（S）重复的线条，在Python我做这种方式：

lines_nodupes = {} 
for elt in lines : 
lines_nodupes[elt] = "" 

既然你不能有两次相同键，没有重复被保留在lines_nodupes dictionnary中，我可以枚举它来访问这些行。

Answer 1

有两个属性，你可以使用：

1. Lines将返回字符串
数组
2. Text将返回整个文本字符串

见RichTextBox从MSDN

如果你想像Python那样做：

Dim noDup as new Dictionary(Of String, String) 

For Each line in MyRichTextBox.Lines 
    if not noDup.ContainsKey(line) then 
     noDUp.add(line, "") 
    End if 
Next 

你也可以做（如由VisualVincent在评析建议）：

Dim noDup as new List(Of String) 

For Each line in MyRichTextBox.Lines 
    if not noDup.Contains(line) then 
     noDUp.add(line) 
    End if 
Next 

这是一个慢一点，但差别不会被看到，除非你有一个很长的产品清单。