Visual Basic Code If Python Case