vb用for...next语句计算15!

用count,否则的话,如果记录太多,你将不停地MoveNext,不停地判断b=a.DimiAsInteger,nAsLong,sAsStringText8=""Adodc1.RecordSource

需要的控件：命令按钮,2个,command1,command2标签,2个,label1,label2command1代码：Private Sub Command1_Click()&

自己一点点试,A在循环前应该赋初值A=0在A=A+1后放一条debug.printi,j,k,a可以得到如下结果.看看变化iJKA11111122113321142125213622272238311

我也才学vb假如是fort=1to10step1那么t的取值就是1、2、3、4、5、6、7、8、9、10；如果step2那么t的取值是1、3、5、7、9；如果是step3那么t取值是1、4、7、10；

fori=3to10000‘查找质数forj=2toi-1x=imodjifi<>0thenexitfor'如果除了1和本身,还能被任意小于本身的一个数整除,那么此数不是指数,并跳出循环,

很简单,因为你每单击一次左边的就执行此过程,而左列表框是每次都更新的.

【答案】：12【运行过程】由于step(步长)为3,每次循环时,i都会+3.如果不写step3则默认每次循环+1循环ii与10比较s①3

这个要看i的数据类型,如果i为整型,如下面形式：dimiaslongfori=2.5to6.5step0.5next结果将会是你所理解的那样,如果i是之前未声明,i的类型是变体,这时就不会自动取整,你

fori=1to20n=1/i^2m=m+nnexti

看来我来的不晚VB实现的,你用着看吧,源码如下SubMain()DimaAsInteger,bAsInteger,cAsInteger,iAsIntegerFori=100To999a=iMod10b

for/next已知循环次数后者更灵活.

Fori=aTob'在i,a,b中,只有改变i才会对循环次数有影响Next

for语句里面有个缺省的参数step,表示步长,表示每次循环变量每次增加多少,默认等于1.这个值可以是正可以是负可以是0,所以当它为0时候就出现死循环了.比如：Fori=0To10Step0Debug

举例dima,b,ifori=1to10a=a+1b=b+1next这个例子在循环内改变啦变量a,b的值但是,不影响循环的次数10次因为a,b不是控制变量dima,b,ifori=1to10i=i+1

dimn,s,i,pdon=val(inputbox("大于0的正整数"))loopuntiln>0andn=int(n)s=1p=-1fori=1tons=s+p*2*n/(2*n+1)p=p*-1

dimsumaslongfori=1to999sum=sum+i^2nextmsgboxsumdimi,sumaslongdowhilei

步长是循环变量每次的增加量,步长的数值类型应该和循环变量一样,其值可以是正数(递增循环)或是负数(递减循环),不能为0（为0自己可以试试,死循环）,如果没有特别指定,则步长默认为1.不知道楼主所说的是

这道题叫测试嵌套循环的计数器.首先之所以说i的范围不对,不满足循环条件,是因为一般在FOR循环中循环变量会根据步长值自动增加或减少,所以在循环体内不建议改变循环变量的值,而本题中循环体里出现了i=i+

这是基础知识,建议找vb基础类教程多熟悉一下PrivateSubForm_Click()Me.ClsDimiAsIntegerFori=0To3Me.PrintString(3+i*2,"*")Nex

fori=1to4printi;（此行输出为:1234）nextiprinti(退出循环时,i=5)再问：为什么会循环到5呢？to4就结束了啊？再答：书上有一句话：当循环的值“超过”终值时，退出循环。