Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load tloading.Start() 'Timer that controls the progress bar record_loading_status = True Application.DoEvents() build_query() 'This is the main task didnt think i would need to show this procedure tloading.Stop() record_loading_status = False Me.ss_status_text.Text = "Ready!" ss_progress_bar.Visible = False End Sub Private Sub tloading_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tloading.Tick If record_loading_status Then If Me.ss_progress_bar.Value < ss_progress_bar.Maximum Then ss_progress_bar.Increment(10) Else ss_progress_bar.Value = 0 End If End If End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.