编写一个vb程序

11 |

3 | 2012-4-9 14:33:21 | 显示全部楼层 |阅读模式

一个text确定输入数的个数，一个commandPrivate Sub Command1_Click()
n = Text1.Text
For i = 1 To n
x = InputBox("请输入第" & i & "个数")
m = m + x
Print x
Next i
m = m / n
Print "平均数为：" & mEnd Sub...

使用道具举报

千问 | 2012-4-9 14:33:21 | 显示全部楼层

楼上就是的...

使用道具举报

千问 | 2012-4-9 14:33:21 | 显示全部楼层

do while trues=val("请输入数值，不输入则结束")i=i+1sum=sum+sif s="" then exit doloopmsgbox sum/i...

使用道具举报

返回列表发新帖

千问

主题	0 回帖	4882万积分

论坛元老

Rank: 8 Rank: 8

积分: 48824836

加好友
发消息

回复楼主返回列表

问答

热门排行

1 男人龟头痛是怎么回事？
2 十二指肠球部溃疡0.8
3 失眠对人体有什么样的危害呢?
4 更年期综合征患者如何饮食调养？
5 性生活对前列腺炎有多大影响？
6 外因瘙痒，蜕皮，疼疼的。
7 导致失眠的原因什么
8 如果在怀孕时期肚子疼,属于正常想象吗
9 鼻子和眼睛不舒服有些发痒
10 脚踝处的钢针多久可以取？
11 患上了乳腺癌还能活下去吗？
12 红斑狼疮患者在日常生活中有需要注意的？
13 什么样的方法可以防脱发没有伤害？
14 月经过后十来天了突然有出血现像
15 糖分的增多能不能引起肾结石？
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 生活中哪些习惯会导致男性不育
41 美白患者都是怎么治？
42 乳腺癌能察觉到吗
43 植发是怎么回事，能详说吗？
44 胎记上有毛发会转变成癌吗？
45 癫痫病人适合结婚生子吗
46 我老公得了斑秃，如何治疗？
47 哮喘病人是有什么原因引起的呢？
48 得了类风湿适宜吃什么
49 月子期间失眠吃了解郁安神
50 想了解肾结石患者有没有需要注意的问题？
51 手脚青筋感觉越来越明显.
52 右手腕舟状骨骨折30天了，可以干活了吗？
53 患上生殖器疱疹的具体症状是什么样子？
54 梅毒的传染传播途径？
55 晚上老是失眠应该怎么办好？
56 全身疼痛皮肤发红还痒
57 输卵管阻塞致不孕的原因是什么
58 宝宝四个月有点流鼻涕防疫苗针打过了发烧3
59 有血压高可以吃鸡肉吗
60 脑涨落分析报告有作用吗
61 治疗精子不液化导致的不孕不育的办法是什么
62 生殖器疱疹能够治愈吗?
63 怀孕了，不想要，大概有五十天左右
64 吃什么对肝炎会有帮助？
65 乳腺癌的症状都有哪些表现呢？
66 便血患者应该注意些什么额呢？
67 月经失调，每个月都不准时
68 便血了该怎么调养呢？
69 查了三维B超，说胎儿左心室约有0.2厘
70 性功能障碍是大病吗？
71 这是怎么了？各位天才医生请回答！
72 脸黄手掌无血色
73 化脓性扁桃体炎，反复高烧
74 连吃了两个月的避孕药一次一个,第三个月怀孕有影响吗
75 湿疹患者都是怎么办的？
76 结肠癌一般怎么预防
77 请颈椎和肩膀相交的那一块酸痛得很，特别是
78 癫痫要怎么治疗呢啊
79 为什么我儿子头上老出汗
80 请问生殖器疱疹会不会传染的？
81 肝炎主要是由什么引起的呢？
82 3岁男孩的鸡鸡应该多长是正常
83 脸部下巴皮肤泛红还有白色是脱皮吧??
84 大便失禁，一天一次，糊在肛门周围
85 怀疑3个半月的宝宝消化不良...
86 有知道甲亢是什么病吗？
87 肿瘤化疗的方法是什么样子的呢？
88 月经不调一会儿有，一会没
89 脱毛前该注意些什么事项啊？
90 肝有损坏，静脉血比正常人高，吃纤雅减肥胶
91 怎么样脱毛比较干净呢？
92 怎样查出哮喘病的病因是什么
93 鼻子长年红，但不肿，有黑头，今年有向两颊
94 得了肝炎应怎么样做?
95 长期失眠严重该如何是好？
96 前天拔智齿缝线了，吊痛
97 人流之后多久来月经是正常的啊？
98 眼睛打针后疼痛不舒服
99 浑身乏力，记忆力减退
100 舌头不舒服半年干燥吃什么药物