代码重构（Visual Basic版）