第一问答网»论坛 › 中问网 › 问答 › vb 1000到7000随机生成一个数字

vb 1000到7000随机生成一个数字

[复制链接]

11 |

2 | 2013-5-27 20:40:28 | 显示全部楼层 |阅读模式

Private Sub Command1_Click()Text1.Text = Str(Int(6000 * Rnd()) + 1001)End Sub上面的写法需要一个按钮，一个文本框...

使用道具举报

千问 | 2013-5-27 20:40:28 | 显示全部楼层

a=int(rnd*7000-1000)+1000...

使用道具举报

返回列表发新帖

千问

主题	0 回帖	4882万积分

论坛元老

Rank: 8 Rank: 8

积分: 48824836

加好友
发消息

回复楼主返回列表

问答

热门排行

1 屁股和大腿的交界处有痘痘，无明显痘痘，
2 潍坊治尿道下裂哪种方式
3 推荐渭南不孕可以治好吗?
4 推荐渭南得了女性不孕如何诊疗?
5 潍坊治尿道下裂什么捌法
6 牙龈发炎然后脸上就长了这个还会发红发热
7 潍坊治尿道下裂方式
8 推荐延安肝病小三阳能治吗
9 做宫腹腔微创手术，需要住院嘛，治疗输卵
10 潍坊治尿道下裂几种方法
11 潍坊治尿道下裂几种捌法
12 推荐渭南怎样治疗女性不孕?
13 潍坊治尿道下裂几种方式
14 推荐太原激光切除包皮价格？
15 我高三，晚上不习惯很晚才睡，需要喝咖啡
16 潍坊治尿道下裂方法
17 检查扩张静脉血流情况
18 推荐延安得了小三阳如何治疗
19 每天跳3000个跳绳两个月能瘦40斤吗
20 推荐延安得肝炎小三阳如何医治
21 推荐渭南不孕严重吗?
22 推荐太原切包皮过长环切术的价格？
23 推荐延安得了小三阳去哪里治疗
24 推荐太原切包皮环切手术价格？
25 推荐太原切包皮过长手术的价格？
26 推荐渭南不孕的原因有哪些呢?
27 推荐太原切包皮过长手术价格？
28 潍坊治尿道下裂
29 耳朵上有点红，要用什么药？
30 潍坊治尿道下裂办法
31 大夫您好，请问我孕28周，羊水指数17
32 眼压高视野oct的报告是这样的报告有反
33 推荐延安大小三阳转阴
34 潍坊治男人尿道下裂手术
35 四川肝病的专家
36 请问一下，喉咙痛会引发胸痛吗？
37 推荐太原切包皮过长的价格？
38 推荐渭南不孕如何诊治?
39 潍坊治男人尿道下裂捌法
40 现在被摸胸有什么影响
41 推荐渭南不孕检查痛吗?
42 推荐渭南不孕的常规检查?
43 推荐太原包皮环切术的价格？
44 潍坊治男人尿道下裂办法
45 检查怀孕8周医生推荐药流吃的是米非早上
46 推荐渭南不孕有哪些症状?
47 五周岁儿童眼睛0.50.6视力，地方医
48 推荐太原激光环切包皮的价格？
49 推荐太原切包皮过长环切的价格？
50 推荐太原切包皮过长的的价格？
51 推荐渭南咨询女性不孕症?
52 满口都是补得牙，和窝沟封闭。还刚做了龈
53 推荐渭南不孕症的咨询?
54 潍坊治男人尿道下裂方法
55 潍坊治男人尿道下裂
56 推荐渭南妇女不孕症的专家咨询?
57 腹泻。喝热水就会肚子疼想去大便
58 推荐延安大小三阳能转阴吗
59 四川肝病怎么办
60 潍坊治疗尿道下裂手术贵吗
61 包皮上长了一个疙瘩，最近没有性生活，这
62 潍坊治疗尿道下裂贵不贵
63 推荐渭南不孕如何诊疗?
64 推荐渭南得不孕如何诊治?
65 潍坊治疗尿道下裂贵吗
66 大腿痛从小腿到大腿到盆骨痛的像针扎的一样
67 潍坊怎样治尿道下裂好
68 潍坊怎样治尿道下裂快
69 推荐渭南不孕太原哪里治好?
70 推荐渭南不孕?
71 潍坊怎样治尿道下裂简单
72 潍坊怎样治尿道下裂
73 失眠多梦怎么办？服用葛洪药膏有用么？
74 推荐宝鸡治疗小三阳患者的方法
75 潍坊怎样简单治尿道下裂
76 潍坊怎样治男人尿道下裂
77 潍坊怎么治尿道下裂快
78 推荐南京市男科医疗？
79 推荐宝鸡治小三阳
80 潍坊怎么治尿道下裂简单
81 前半月头晕房转后输血塞通曲克芦丁好了五
82 胸闷气短，喘气有前胸灼热感！
83 洗完澡后头皮，脖子前胸老是痒