VBでvolatile使いたいんですぅ