Select Case Statement Vb Netspend