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 SubDrag 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 SubEnd Button
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
sw.Stop()
Timer1.Enabled = False
End Subi have attached the video link below. which will do this tutorials step by step.