% Public Function BornVerifyCode() Randomize '设置随机因子 BornVerifyCode=Mid((Rnd * 1000000), 1, 4) '生成6位随机数,取高4位 End Function %>