Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
[blue] Public Sub LengthyTask()
While True
If flag Then
Exit While
End If
[COLOR=#F57900]Application.DoEvents()[/color]
End While
MsgBox("TextBox1.Text = " & TextBox1.Text)
End Sub[/blue]