私はビジュアル ベーシックの初心者で、空き時間に小さなプロジェクト用のテキスト ベースのゲームを作成しています。ゲームにはスコアリング システムがあり、ゲーム終了時にユーザーのスコアがテキスト ファイルに保存されます。テキストを追加するのは難しくないと確信していますが、ファイルに書き込むコードを書いていません。私が抱えている問題は、ハイスコアを表示することです。それらを読み込むことができ、Split(",") を使用できます。結果を素敵なテーブルに表示することもできます。私が抱えている問題は、実際のスコアの順にハイスコアを表示することです。これは、スコア テーブルを作成するために必要なコードです。出力))
Dim FStrm As FileStream
Dim StrmR As StreamReader
FStrm = New FileStream("HighScores.txt", FileMode.Open)
StrmR = New StreamReader(FStrm)
Dim highScores As New List(Of String)
While StrmR.Peek <> -1
highScores.Add(StrmR.ReadLine)
End While
FStrm.Close()
Console.WriteLine(" __________________________________________________________________ ")
Console.WriteLine(" | Score | Name |")
Console.WriteLine(" |-------------------|----------------------------------------------|")
Dim Scores() As String
For Each score As String In highScores
Scores = score.Split(",")
Console.WriteLine(" | {0} | {1} |", Pad(Scores(0), 15), Pad(Scores(1), 40))
Next
Console.WriteLine(" |___________________|______________________________________________| ")
以下はテキストファイルの例です。
2,Zak
10000,Charlie
9999,Shane
90019,Rebecca
誰かがスコアで行を並べ替える方法を見つけるのを手伝ってくれませんか? まったく別のアプローチを取る必要があるのでしょうか? どうもありがとうございました!
-チャーリー