s="ABBACDDBA"ForI=6To2,step-2 x=Mid(s,I,I) y=left(s,I) z=rig
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/22 07:20:57
s="ABBACDDBA"ForI=6To2,step-2 x=Mid(s,I,I) y=left(s,I) z=rigt(s,I) Next I Msgbox z End sub
结果是多少啊,要分析
结果是多少啊,要分析
Private Sub Form_Load() s = "ABBACDDBA" For I = 6 To 2 Step -2 'x = Mid(s, I, I) 'y = Left(s, I) '通过 MsgBox z 可知,结果与 x,y 没关系 z = Right(s, I) '从这里可以看出 z 的值每一次循环都把之前的值覆盖 '掉.所以,只是循环的最后一次起作用,已知每次循 '环 I分别为 6,4,2,最后一次是 2 ,所以 z=Right(s,2) 'z 取 "ABBACDDBA" 的右边两个 即是 "BA". Next I MsgBox zEnd Sub'结果是 BA .
For i=1 To10 Step 2 s=s+i Next i Print i 的
s=26 FOR I=1 TO10 STEP 2,S=S-I,ENDFOR 'S=',S
s=1 for i=1 to 5 step 2 s=s+i endfor s
s=0 For i=1 to 10 step 2 s=s+i Next Print s
已知程序段:s=0 Fori=1 to 10 step2 s=s+1 i=i*2 Nexti 当循环结束后,变量i的值为
写出运行结果:s=o FOR I=2 TO 200 STEP 2 S=S+I "I=",I IF S>10 EXIT E
s = 2 For i = 3.2 To 4.9 Step 0.8 s = s + 1 next i
For i = 2.6 To 4.9 Step 0.6 s = s + 1 Next i
已知程序段:s=0 For i =1 to 10 step 2 s = s+1 i = i * 2 Next i 当循环
已知程序段:s=o,for i = 1 to 10 step 2,s=s+1 ,i = i*2 ,next i ,当循环
s=0 for i = 1 to 10 step 2 if int(i/3)=i/3 loop endif s=s+i
s = 0 For i = 1 To 10 Step 3 s = s + i Next i Print s s的解是什么