Visual Basic 2008 或 2012 中的 String.Contains 函数 [英] String.Contains Function in Visual Basic 2008 or 2012

问题描述

如何找到包含在单个 .txt 文件中且每行不同的字符串的唯一字符串?

<小时>

示例:.txt 文件包含以下内容

012345
023456
034567
045678
056789

然后我想找到一组数字中的一个.

<小时>

这就是我想要的~

Dim stN As String = TextBox1.Text如果 stN.contains(.txt 文件) 那么'在这里可以做任何事别的MsgBox("你输入的号码不正确", "ERROR")万一

解决方案

我认为你的伪代码应该是相反的:If .txt-file.Contains(stN) Then.>

所以你想知道一个字符串是否等于文本文件的一行:

Dim lines = File.ReadLines(path)Dim fileContainsLine = lines.Any(Function(l) l.Trim.Equals(TextBox1.Text, StringComparison.OrdinalIgnoreCase))

如果您不想不区分大小写地进行比较，请改用 l==TextBox1.Text.如果 Trim 也是不必要的，您可以将其简化为:

Dim fileContainsLine = lines.Contains(TextBox1.Text)

How do I find a unique string that contains in a single .txt file with different strings in each line?

---

Example: The .txt file contains the following

012345
023456
034567
045678
056789

Then I want to find one of the set of numbers.

---

This is what I want to happen~

Dim stN As String = TextBox1.Text

If stN.contains(.txt file) Then
    'Anything to do here
Else
    MsgBox("Your input number is incorrect", "ERROR")
End If

解决方案

I assume your pseudo code should be the other way around: If .txt-file.Contains(stN) Then.

So you want to know if a string equals one line of a text-file:

Dim lines = File.ReadLines(path)
Dim fileContainsLine = lines.Any(Function(l) l.Trim.Equals(TextBox1.Text, StringComparison.OrdinalIgnoreCase))

If you don't want to compare case-insensitively use l==TextBox1.Text instead. If the Trim is also unnecessary you could simplify it to:

Dim fileContainsLine = lines.Contains(TextBox1.Text)

这篇关于Visual Basic 2008 或 2012 中的 String.Contains 函数的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！