第一问答网»论坛 › 中问网 › 问答 › 任意5个数相加，在VB中的语言是怎么编写的呢？ ...

任意5个数相加，在VB中的语言是怎么编写的呢？

11 |

0 | 2007-5-26 08:47:08 | 显示全部楼层 |阅读模式

加一个Command1Private Sub Command1_Click()Dim a(5), sum As LongDim i As IntegerFor i = 0 To 4a(i) = Int((10 * Rnd) + 1) ' 生成 1 到 10 之间的随机数值sum = sum + a(i)NextPrint sumEnd Sub

使用道具举报

返回列表发新帖

千问

主题	0 回帖	4882万积分

论坛元老

Rank: 8 Rank: 8

积分: 48824836

加好友
发消息

回复楼主返回列表

问答

热门排行

1 平顶山多囊卵巢怎么引起的？
2 平顶山多囊卵巢怎样可以怀孕？
3 平顶山多囊卵巢怎么治？
4 做完宫腔镜手术后注意事项？
5 平顶山多囊卵巢中医还是西医？
6 平顶山多囊卵巢只吃达英35就能好吗？
7 平顶山多囊卵巢中药调理药方？
8 咸阳输卵管打了个结会很麻烦吗？
9 做无痛人流多少可以同房？
10 咸阳输卵管的防粘连治疗？
11 咸阳输卵管道包括哪三个？
12 咸阳输卵管堵塞不通可以怀孕吗？
13 咸阳输卵管堵塞b超能看出来吗？
14 咸阳输卵管堵塞冲水要住院吗？？
15 咸阳输卵管堵塞大概ds多少钱？
16 咸阳输卵管堵塞的民间偏方？
17 做一个输卵管检查？
18 做阴道镜需要多少钱？
19 做阴超可以看见小卵泡吗？？
20 做孕前检查多少钱？
21 咸阳输卵管堵塞还有排卵期吗？
22 做罩影容易怀孕吗？
23 做罩影有什么副作用？
24 做重新结扎手术成功率多少？
25 咸阳输卵管堵塞会怎么样？
26 咸阳输卵管堵塞会正常排卵吗？
27 咸阳输卵管堵塞会自己通吗？
28 驻马店治股骨头坏死需要多久?
29 咸阳输卵管堵塞就是通水?？
30 咸阳输卵管堵塞检查？
31 咸阳输卵管堵塞积水严重吗？
32 驻马店股骨头坏死治疗?
33 平顶山多囊卵巢综合症怎样治疗？
34 平顶山多囊卵巢综合症有生育影响吗？
35 本人患有慢性咽炎(近几年才有)，也有慢
36 咸阳输卵管堵塞能生小孩吗？
37 平顶山多囊卵巢综症停经很严重吗？
38 平顶山多囊囊肿有什么症状？
39 平顶山多囊难冶吗？
40 平顶山多囊卵巢做b超要多少钱？
41 咸阳输卵管堵塞能再通吗？？
42 平顶山多囊如何怀孕？
43 平顶山多囊倾向？
44 平顶山多囊是什么病？
45 平顶山多囊是什么？
46 平顶山多囊是什么东西？
47 咸阳输卵管堵塞排卵的时候会疼吗？
48 咸阳输卵管堵塞是由什么原因引起的？
49 咸阳输卵管堵塞手术多久能好？
50 咸阳输卵管堵塞视频。？
51 平顶山多囊治疗的好吗？
52 咸阳输卵管堵塞通水三次能好吗?？
53 平顶山多囊治疗三个月消失了？
54 平顶山输卵管报告单通而不畅是堵塞吗？
55 平顶山多囊肿卵巢治疗？
56 平顶山输卵管半边切除，可孕育吗？
57 平顶山多囊状态怎么解除？
58 平顶山输卵管不通畅症状？
59 平顶山输卵管不通吃什么药能通？
60 平顶山输卵管不通能怀孕吗？
61 咸阳输卵管堵塞需不需要动手术？
62 平顶山输卵管不通检查？
63 平顶山输卵管不通怎么治疗啊？
64 平顶山输卵管不通怎么办？
65 咸阳输卵管堵塞需要好多钱？
66 平顶山输卵管粗大怎么回事？
67 平顶山输卵管堵塞b超能看出来吗？
68 平顶山输卵管堵塞的症状？
69 平顶山输卵管堵塞积水严重吗？
70 平顶山输卵管堵塞手术费？
71 平顶山输卵管堵塞是什么原因才会?？
72 平顶山输卵管堵塞是什么原因？
73 平顶山输卵管堵塞是由什么原因引起的？