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.
Dim v() As Integer
Dim blnInit as boolean
If IsArray(v) Then
blnInit = True
On Error resume next
' fails with subscript out of range
Debug.Print UBound(v)
if Err.Number <> 0 then blnInit = false
On error goto 0
End If
Dim v As Variant
If IsArray(v) Then ' Is not an array Ok.
debug.Print UBound(v)
End If