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.
Class myStatusBar
' Assuming frmMain is your form with the statusbar
Shared Sub WriteStatusBarMSG(ByVal Message as String, ByRef f as frmMain)
f.Statusbar1.Text = Message
End Sub
End Class
' Your call from the main form
Sub Whatever()
myStatusbar.WriteStatusBarMSG("Hello", Me)
End Sub