2005年6月28日
摘要: PrivateFunctionGetRandomizeNo()FunctionGetRandomizeNo()AsInteger'功能说明:生成随机验证码DimRandomizeNoAsIntegerRandomize()RandomizeNo=9999*Rnd()+1000If(RandomizeNo).ToString.Length>=5ThenRandomizeNo=Val(Rando... 阅读全文
posted @ 2005-06-28 08:39 T_98Dsky 阅读(659) 评论(0) 推荐(0) 编辑