Time 추가 하기
교교
2014.04.08 18:03:23
*: Public Class Form1
Dim mydate As Date = Now
Dim runtime As Date
Private Sub Timer1_Tick(sender As System.Object, e As System.EventArgs) Handles Timer1.Tick
Timer1.Start()
Label1.Text = "기준시간 : " & mydate
Label2.Text = "경과시간 : " & Now
If Now >= runtime Then
End
End If
End Sub
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
runtime = Date.Now.AddMinutes(1441)
Label3.Text = "실행시간 : " & runtime
End Sub
End Class