ListBoxについて

Question

ファイルに

問題数

※

問題

答え

ボーナス

※繰り返し

が書いてあるファイルを問題だけリストボックスに並べて表示させたいのですが。  

 Do While a > Form3.問題数.Text
                    Dim SkipLine As Integer = a * 3
                    Do While i > SkipLine
                        Reader.ReadLine()
                        i += 1
                    Loop
                    Form3.ListBox1.Items.Add(Reader.ReadLine)
                    Reader.Close()
                    a += 1
                Loop

とするとリストボックスに何も表示されないのですが。どうしたらよいでしょうか

 

Answer 1

Reader.ReadLine() の戻り値を変数に代入するようにして、１行１行地道にトレース実行するのが良いと思うのですが、いかがでしょうか？

Answer 2

Do Whileは、条件を満たしている間はループ内を繰り返し実行するものです。与えられた条件を見ると不等号の使い方がおかしいように思います。

＞とするとリストボックスに何も表示されないのですが。どうしたらよいでしょうか

このような場合はブレークポイントを設置するなどしてステップ実行し、実際に思い通りにコードが動いているか確認してみましょう。

 

---

★良い回答には回答済みマークを付けよう！ わんくま同盟 MVP - Visual C# http://d.hatena.ne.jp/trapemiya/

Answer 3

どんな問題数でも読みこめるようにしたいので地道ちやるのはは避けたいのですが、ブレークポイントをどこにやっても書き込んでくれません。

Answer 4

「問題数が 1000 を超えるとおかしい」とかいった話ではなく、ListBox に何も表示されないという話ですので、地道にやっても大変ではないと思うのですが。
問題のループ (外側の Do While) の直前にブレークポイントを置いてトレースすると、ループの中に入らなくてあらら、ということになりそうに思います。
少なくとも自分の書いたコードが期待通りに動いているかを最小限のトレース実行で確かめるのは、プログラマーとして務めではないかと思うのですが。
問題数が多くて嫌だというなら、ブレークポイントの置き方や条件で、途中は省略できるわけですし。

Answer 5

皆さんのおかげで無事解決できました！

ありがとうございます。

 Do While i < 問題数
          On Error Resume Next
          Form3.ListBox1.Items.Add(Reader.ReadLine)
          Reader.ReadLine()
          Reader.ReadLine()
          i += 1
        Loop

Answer 6

エラーが発生しても、なかったことにするのは解決策にならないはずです。