Dim Num As Single
Randomize Timer
Num = Format(Rnd * 20 + 30, "#####.0")
MsgBox Num
Randomize Timer
Num = Format(Rnd * 20 + 30, "#####.0")
MsgBox Num
解决方案 »
- 找不到可插入的ISAM
- 共享:《Visual Basic 程序设计》幻灯片电子教程
- 高分求万年历原程序!!!!!
- 数据库查询
- 为什么打开以前保存的工程文件,还要输入密码?
- 使用ADODB.Recordset记录集Save到ADODB.Stream时, 使用adPersistADTG 参数, Stream 中的值缺少很多,如何解决?
- 怎么取消数据自动提交,在线等待。。。。
- 解决.net和水晶报表打包的极佳工具:InstallShield Developer v8.02 免费版 [五星]
- 各位需要完整的原代码的,请留下你的E-mail!!
- 如何查到目录的大小!
- 执行数据库更改命令时出错!高分解决!在线等待!
- 如何将.dll组件,安装到COM+中?
Randomize Timer
Num = Format(Rnd * 20 + 30, "##.0")
Randomize
Num = Format(Rnd * 80 - 30, "##.0")
randomize
num=round(rnd*20+30,1)