0

ユーザーが名前と誕生日を入力するプログラムに取り組んでいます。次に、次の形式で .txt ファイルに保存します。

  • John Doe 4/10/2000 <---- (名前と日付は「スペース」ではなく「タブ」で区切ります)

すべてがプログラムで機能しています。月や名前などで日付を並べ替える限り、データを正常に表示できますが、検索機能を適切に機能させる方法がわかりません。ユーザーが検索する名前を入力するテキストボックスがあります。したがって、John Doe と入力すると、プログラムはそのテキスト ファイル (birthday.txt) を検索し、日付 4/10/2000 を表示する必要があります。その名前が見つからない場合、プログラムは名前が見つからなかったことを示すメッセージを表示する必要があります。助けてください！

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 に答える