Want to increase your earning potential in 2018? Pad your resume with app building experience. Learn how with this hands-on course.
Application.DoEvents() 'thought this would help...but it hasn't With lnkAppointments .Visible = True 'start out by making the label visible .Text = "Retrieving appointments ..." 'change the text to let the user know the appointments are being queried End With '[Code to connect with Outlook and retrieve appointments...] If ts.TotalMinutes = 0 Then ' if the timespan in minutes is 0, simply hide the link label lnkAppts.Visible = False Else With lnkAppts .Text = Format(ts.Hours, "#0") & ":" & Format(ts.Minutes, "00") & " found." ' if the timespan is not 0, then display the amount of time discovered. End With