会vbs的来下，最好是高手，帮菜鸟加下END IF，说明在什么地方加，详细点好。

dim mm,fx,pj,fl do while mm"19990110" mm=inputbox("欢迎使用升菊弹弹堂高抛分析系统。请输入本系统专属用户密码。","系统登录") loop fx=inputbox("请输入现在的风向，输入“顺风”或“逆风”即可。","升菊弹弹堂高抛分析系统 ?? 风向") if fx="顺风" then msgbox"请将力度调为90