절약 시간

Question

나는 다음과 같은 코드를 가지고 :

Public Class MyAccount 

Dim FileName As String = Application.StartupPath & "\myarray.txt" 
Dim AccessLog() As String 

Private Sub MyAccount_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
    ListBox1.Items.Clear() 
    AccessLog = File.ReadAllLines(FileName) 
    ListBox1.Items.AddRange(AccessLog) 
    ListBox1.Items.Add("Last Login: " + DateTime.Now.ToLongTimeString()) 
    IO.File.WriteAllLines(FileName, ListBox1) 
    ListBox1.Refresh() 
End Sub 

End Class 

이 코드 내 목표는 양식 내 계정()을 열 때마다, 그것은 목록 상자에 레코드를 추가하는이며, 이 파일을 텍스트 파일에 저장하여 응용 프로그램을 닫은 후 보존합니다. 그러나, 나는 내가 그것을 최선의 방법을하고있어 확실하지 않다, 나는 오류를 받고 있어요 라인에 "파일이 선언되지 않았습니다 그것은 액세스 할 수 있습니다 인해 보호 수준에."

AccessLog = File.ReadAllLines(FileName) 

어떤 도움이라도 대단히 감사하겠습니다.

Answer 1

사용 다음 중 하나를

System.IO.File.ReadAllLines 

또는 다음 네임 스페이스 가져옵니다

System.IO. 

Answer 2

사용에게 ListBox.Items 수집이 파일에 쓸 수 있습니다. 한 가지 방법은 LINQ 함께 :

Private Sub MyAccount_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
    ListBox1.Items.Clear() 
    AccessLog = File.ReadAllLines(FileName) 
    ListBox1.Items.AddRange(AccessLog) 
    ListBox1.Items.Add("Last Login: " + DateTime.Now.ToLongTimeString()) 
    IO.File.WriteAllLines(FileName, ListBox4.Items.Cast(Of String)().ToArray) 
    ListBox1.Refresh() 
End Sub 

Answer 3

이 파일에서 다시 쓰기 전에뿐만 아니라, 당신이 그것을에 "마지막 로그인"값을 추가 할 수있는 라인을 잡아 (문자열) 목록을 사용하여

Public Class MyAccount 

    Dim FileName As String = System.IO.Path.Combine(Application.StartupPath, "myarray.txt") 
    Dim AccessLog As New List(Of String) 

    Private Sub MyAccount_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
     If System.IO.File.Exists(FileName) Then 
      AccessLog.AddRange(System.IO.File.ReadAllLines(FileName)) 
      ListBox1.Items.AddRange(AccessLog.ToArray) 
      ListBox1.Items.Add("Last Login: " + DateTime.Now.ToLongTimeString()) 
     End If 
     AccessLog.Add(DateTime.Now.ToLongTimeString()) 
     System.IO.File.WriteAllLines(FileName, AccessLog) 
    End Sub 

End Class 

Load() 이벤트 외부에서 List() 데이터가 필요하지 않은 경우 해당 데이터를 지역 사용자로 선언하여 가비지 수집하도록하십시오. 여전히 ListBox의 값에 액세스 할 수 있습니다. 그 정보로 무엇을하고 있는지에 따라 달라집니다 ...