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.
Private Sub TabCtl0_Change()
Select Case TabCtl0.Value
Case 0
MsgBox "Page 1 Selected"
'do some code here when page 1 selected'
Case 1
MsgBox "Page 2 Selected"
'do some code here when page 2 selected'
Case 2
MsgBox "Page 3 selected"
'do some code here when page 3 selected'
End Select
End Sub