Visual Basic Code If Function With Multiple Logics