如何直接找到多个文本而不循环

Question

我有一个列表->此列表（2000+）中有12,15,16,19,10,11,13个各种文本，现在我想使用一个不带循环的cmd在此列表中找到my.txt文件每个人都有解决方案吗？

示例代码-

dim x as string = io.file.readalltext("myfile.txt")

按钮1单击...

Dim result as string = x.index of (item1,item2)