第8回 ファイル入出力をマスターしよう（2/4） - ＠IT

■テキスト・ファイルからデータを読み出せるようにするには ［検索］ボタン、つまりbtnSearchコントロールのClickイベント・ハンドラの名前がcountNumberであるとすると、コードは以下のようになる。まずは、ファイルから行を読み出す部分に注目して見てみよう。対象となるファイルの名前は「c:\Home\attend.log」とする。 Imports System.IO : : Private Sub countNumber(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSearch.Click Dim sr As StreamReader Dim oneLine As String Dim iCount As Integer = 0 sr = New StreamReader("c:\

[chaWan]

If oneLine.Contains(txtNumber.Text) = True ThenでtxtNumber.Textに1234と代入するとすべての行がtrueとなって返される