vb6,msgbox弹出后,延时设定的秒数后自动关闭代码,测试可用.