Using Visual Basic, with strcit type option on,

Create a Function procedure named IsValidZipCode. The procedure should accept one argument containing the string to validate, and return a Boolean value. A valid zip code contains either five characters or 10 characters. The 10-character, zip+four code has the format xxxxx-xxxx, where x is a digit and the dash is a literal character. The function should return True if the zip code is valid and False otherwise. Create a Button's click event handler, as necessary, to test the procedure.