Código de Visual Basic - Analizador Sintactico

Código que toma como validas las cadenas que contengan unos pares y ceros impares, si la cadena no cumple con esta característica o tiene otro carácter a parte de ceros y unos, la toma como invalida.