타이머 및 레이블 텍스트 업데이트

Question

"새 항목이 없을 때 표시 할 앱 만들기를 시도 중입니다. 그래서 Label1과 Timer를 만들었습니다. 나는 모든 secound가 status.txt 텍스트가 0이면 text.txt의 텍스트를 보여주기 위해 아무 것도 보여주지 않기를 원한다. 이것은 지금까지 시도 할 것입니다 :

Public Class Form1 
    Dim client As WebClient = New WebClient() 
    Dim status As String = client.DownloadString("http://force-play.com/launcher/status.txt") 
    Dim information As String = client.DownloadString("http://force-play.com/launcher/text.txt") 

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
     Timer1.Start() 
     Timer1.Interval = 1000 
    End Sub 

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick 
     If status = 0 Then 
      Label1.Text = "No New Info" 
     End If 
     If status = 1 Then 
      Label1.Text = information 
     End If 
    End Sub 
End Class 

Answer 1

시도가 Timer1_Tick 방법의 시작 부분에 status 문자열을 설정.