0

我一直在开发一个用户输入姓名和生日的程序。然后它以以下格式保存到 .txt 文件中

  • John Doe 4/10/2000 <---- （名称和日期由“制表符”分隔，而不是“空格”）

程序中一切正常，我可以很好地显示数据，只要按月份或按名称等对日期进行排序。但我不知道如何让搜索功能正常工作。我有一个文本框，用户将在其中输入要搜索的名称。因此，如果他们输入 John Doe，则程序应搜索该文本文件 (birthday.txt) 并显示日期 2000 年 4 月 10 日。如果未找到该名称，则程序应显示一条消息，说明未找到该名称。请帮忙！

4

1 回答 1

0

也许：

Dim people = From line In File.ReadLines(path)
       Let userprops = line.Split({vbTab}, StringSplitOptions.None)
       Let Name = userprops.First()
       Let BirthDate = userprops.Last()
       Where Name.IndexOf(txtUsername.Text, StringComparison.OrdinalIgnoreCase) > -1

If Not people.Any() Then
    MessageBox.Show("No user found with that name")
Else
    Dim firstUserBirthDate = people.First().BirthDate 
    MessageBox.Show(firstUserBirthDate.ToString())
End If

我使用IndexOf而不是=向您展示如何不区分大小写地搜索名称的一部分。

于 2013-04-10T14:16:50.697 回答