中易网

VB的一个题

答案:4  悬赏:80  
解决时间 2021-04-27 09:13

下列算法是否正确?

Dim I as Integer

for I=0 to 10

  i=i+1

next I

若不正确,请写出:

最佳答案

'代码正确,但毫无意义,可以修改成这样:


Dim i As Integer , a As Integer
For i = 0 To 10
  a = a + i
Next i
MsgBox a

全部回答

你的这样错了吧.

还有不知道你要算什么正确的是

Dim i as Integer

for i = 0 to 10

  i = i + 1

next I

如你是要算0至于10的和那是:

Private Sub Form_Click() Dim I%, O% For I = 0 To 10   O = O + I Next I Print O End Sub

Dim I as Integer

for I=0 to 10

  l=l+1

next I

我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
学素描要不要从小时候学起啊?
梦幻里WZ怎么加点攻高敏高
请帮忙给起个公司名字,做化肥的企业,最好能
汽车手动挡好还是自动档好?还是手自一体好
江苏一区这个残杀值多少钱
谁能告我PHOTOSHOP中文版下载地址,之前下载的
《仙剑奇侠传3》一共有几集?是40集还是38集
请问 索爱的手机从各个方面来说好不好啊!哪
吃什么东西比较补血
黑龙江有没有“黑龙江省教育学会文化技术学校
遗传性的雀斑能去掉吗?一般是几岁开始长的?
廊坊市华油五中是廊坊什么区的?
没有钱的爱情真的会变质吗?
地下城被封一年要怎么样才能申述回来
海贼王里谁最有个性?
推荐资讯
我妈妈去世了,爸爸找了个女人做我的继母。我
谁可以告诉我可以做空间背景音乐的地址《爱情
《三国》里谁武功最强
《网球王子》为什么猫猫总是贴着胶布
我有一红珊瑚项链请行家鉴定一下,实物红颜色
老婆出去租房子又不离婚,面都不见,什么意思?
5林+10什么加的
贵族颜色是什么颜色?
喜欢小贱啊?
会计基础资产负债表中计算长期待摊费用在贷方
谁能帮我合成一张照片,谢谢了
我家下的极品飞车13怎么有2个图标
手机登qq时,显示手机磁盘不足,清理后重新登
刺客的套装怎么选啊?