Private Sub timer1_Tick(ByVal sender As Object, ByVal e As EventArgs)
			Dim num1, num2, num3 As Integer

			Dim r As New Random()
			bunifuProgressBar1.Value = r.Next(0, 100)
			bunifuProgressBar2.Value = r.Next(0, 100)
			num2= bunifuProgressBar2.Value== r.Next(0, 100)
			bunifuProgressBar3.Value = r.Next(0, 100)
			num3=bunifuProgressBar3.Value== r.Next(0, 100)
			bunifuLabel6.Text = $"<table><tr><td><b style='font-size: 40px;'>{num1.ToString()}</b></td></tr><tr><td><b style='color: white;'>BACK-END</b></td></tr></ table > "
			bunifuLabel7.Text = $"<table><tr><td><b style='font-size: 40px;'>{num2.ToString()}</b></td></tr><tr><td><b style='color: white;'>FRONT-END</b></td></tr></ table > "
			bunifuLabel8.Text = $"<table><tr><td><b style='font-size: 40px;'>{num3.ToString()}</b></td></tr><tr><td><b style='color: white;'>DESIGN</b></td></tr></ table > "

      'calling the chart function
			display_Chart(r)


End Sub