随机函数 Dim i As LongFor i = 1 To 10 Debug.Print 80 + Int(Rnd * 20)Next i 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 For i = 1 To 10 List1.AddItem 80 + Int(Rnd(i)*20)Next i 求助 关于VBA ACCESS里的查询属性 的记录集类型 求VB表单设计打印源程序 报表打印???很急!!! 如何把excel中的数据筛选后导入到access特定表中? 如何知道程序执行完成还剩多长时间 在VB中如何控制调制解调器?比如挂机,CD监测等等 我也想要ACTIVEREPORT的心得,谢谢[email protected] 大好消息,“水如烟 之 ‘老鼠摆尾’(lzmtw)” 已有解决方案了,绝对对大家有好处,也欢迎您继续探讨 救人一命胜造七级浮屠!! 关于vb获取webbrowser中iFrame中的图片的问题 如何访问磁盘的指定磁道指定扇区? 怎样才能学好用api函数编写程序
List1.AddItem 80 + Int(Rnd(i)*20)
Next i