だから私はメニューバーとlstboxを備えたフォームを持っています. メニュー バーには、3 つの選択肢がある [表示] オプションがあります。すべて、フィクション、またはノンフィクション。テキストファイルには、本のタイトル、著者、カテゴリ (小説または非小説)、在庫、価格がこの順序で含まれています。ユーザーが [すべて表示] をクリックすると、すべてのタイトルがリストボックスに表示されます。Nonfic をクリックすると、ノンフィクションのタイトルだけが表示され、フィクションも同じです。これまでの私のコードは次のとおりです。
Private Sub menuDisplay_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles menuDisplay.Click
Dim books() As String = IO.File.ReadAllLines("Books.txt")
Dim data() As String
Dim allBooksTitle, allNonFicTitle, allFicTitle As String
For i As Integer = 0 To books.Count - 1
data = books(i).Split(","c)
allBooksTitle = data(2)
If data(2).Trim = "N" Then
allNonFicTitle = data(0)
ElseIf data(2).Trim = "F" Then
allFicTitle = data(0)
End If
Next
' show result
If menuDisplayAll.Checked Then
lstBox.Items.Add(allBooksTitle)
ElseIf menuDisplayFic.Checked Then
lstBox.Items.Add(allFicTitle)
ElseIf menuDisplayNonFic.Checked Then
lstBox.Items.Add(allNonFicTitle)
End If
End Sub
フィクションまたはノンフィクションの本のタイトルのみを表示し、リスト ボックスに追加する代わりに各ボタン間でリスト ボックスを更新するコードを記述する方法がよくわかりません。どんな助けでも大歓迎です!