VB程序填空(Option Explicit)1