VB機能は使わないので翻訳していません