Tutusfunny

Internet Cafe Management System is used to manage the time usage of the System.when the person sit on the machine. started to browsing the internet Internet Cafe Management System is On it is calculating the time and the amount.

Form Load

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        Timer1.Interval = 1000
        Timer1.Enabled = True
        StartTime = Now
        sw.Start()

    End Sub

Drag the timer control from the toolbox and double click and write the following code

Timer

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick

        TextBox2.Text = sw.Elapsed.ToString("hh\:mm\:ss")
        If DateDiff(DateInterval.Minute, StartTime, Now) >= 1 Then
            CumlativeValue += 50
            Label3.Text = CumlativeValue.ToString
            StartTime = Now
        End If

        TextBox1.Text = Now.ToString("h:mm:ss tt")

    End Sub

End Button

 Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        sw.Stop()
        Timer1.Enabled = False


    End Sub

i have attached the video link below. which will do this tutorials step by step.