You created a Select…End Select construct, but did not include any Case statements. The following demonstrates the correct usage of the Select…End Select construct.
Select Case testexpression
[Case expressionlist-n
[statements-n]] . . .
[Case Else expressionlist-n
[elsestatements-n]]
End Select
To correct this error
Make sure that the Select…End Select construct includes all the necessary parts.