tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]　 [ワード検索]　 [Home]

タイトル ： MonthCalendar
投稿日： 2008/08/24(Sun) 16:09
投稿者： たなあ
MonthCalendarで日付を選択して、その日の分のデータをメモ帳から読み込めるようにしました。
一回目は表示されるのですが、続けて別の日を選択すると、メモ帳の中身が表示できません。何かいい方法はないでしょうか。
コードは下記の通りです。

  Dim er As New IO.StreamReader("seiseki.txt", True)
    Dim buffer As String
    Dim items(3) As String
    Dim i As Integer

  Private Sub MonthCalendar1_DateSelected(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DateRangeEventArgs) Handles MonthCalendar1.DateSelected　
Do Until er.EndOfStream
            buffer = er.ReadLine()
            items = buffer.Split(",,")
            If items(0) = Me.MonthCalendar1.SelectionRange.Start Then
                Label7.Text = items(0)
                Label6.Text = items(1) & vbLf & "ランク" & items(2)
                i += 1

            End If
        Loop
    End Sub

よろしくお願いします。
- 関連一覧ツリー （ をクリックするとツリー全体を一括表示します）

古いスレッドにレスはつけられません。