知识百科网 -- 知识百科,知识的海洋！大家一起编写的百科！

　　Dim x As Integer, o As String, intRnd As Integer For x = 1 To 10 Randomize Do intRnd = Rnd() * 100 Loop Until intRnd Mod 2 = 0 o = o & intRnd & "," Next tb1.Text = o



相关知识

·电脑桌面的那条横隐	·电脑玩游戏时会自动
·为什么我的知道达人	·麦克风没声音
·求免费代理IP软件	·有丰富局域网防护攻
·求光影魔术手 nEOiMA	·装系统时中断，重启
·我要配内存，怎么看	·EXCEL工作表中什么情况
·-0- 我还想问问你阿。	·想买笔记本
·谁知道以后的时尚流	·windows7普通版用不了
·开机弹出的框框	·求助关于QQ的一些技术
·5,318,285KB等于多少MB啊	·显卡声卡网卡集成在
·悟空搜索的网址是什	·IE浏览器上网时卡巴斯

VB 怎么生成10个100内随机的偶数
本文地址：http://www.youonce.com/Internet/2010/0126/VB 怎么生成10个100内随机的偶数.html