Visual Basic正则表达式问题

Question

我有一个字符串列表。当用户输入字符时，程序会在文本框中显示列表中所有可能的字符串。

Dim fruit as new List(Of String) 'contains apple,orange,pear,banana 
Dim rx as New Regex(fruit) 

例如如果用户输入一个，P，L，E，R，则程序将显示苹果和梨。 它应该匹配所有已输入字母的条目，不管顺序如何，也不管附加字母。 我应该向rx添加什么？如果使用正则表达式不可能，请指定其他任何方式来执行此操作。

Answer 1

LINQ方法：

Dim fruits As New List(Of String) From { "apple", "orange", "pear", "banana" } 
Dim input As String = "a,p,l,e,r" 
Dim letters As String = input.Replace(",", "") 
Dim result = fruits.Where(Function(fruit) Not fruit.Except(letters).Any()) 

正则表达式的方法：

一个正则表达式匹配的结果将类似于这样的：

"^[apler]+$" 

这可以建立起来的：

Dim fruits As New List(Of String) From { "apple", "orange", "pear", "banana" } 
Dim input As String = "n,a,b,r,o,n,g,e" 
Dim letters As String = input.Replace(",", "") 
Dim pattern As String = "^[" + letters + "]+$" 
Dim query = fruits.Where(Function(fruit) Regex.IsMatch(fruit, pattern))