For y3 = xn To xn1
For x3 = yn To yn1
用上面的为什么不可以 我变量都声明的了 For y3 = 196 To 230
For x3 = 523 To 550xn xn1 yn yn1 的值不固定 若不能用这些 希望给个解决办法
For x3 = yn To yn1
用上面的为什么不可以 我变量都声明的了 For y3 = 196 To 230
For x3 = 523 To 550xn xn1 yn yn1 的值不固定 若不能用这些 希望给个解决办法
解决方案 »
- 如何在我点击combo选项时,数据库的相应数据被调出,并在textbox中显示
- 一个关于 resize事件的问题,拜托帮帮忙
- 拦截鼠标点击的问题
- 各位大虾给点VB6.0的成长建议吧!!!!!!!
- 用VB6怎样编写多线程断点续传?
- 请给一个用vb导入导出pdf文件的原程序或代码模块,谢谢!(E-MAIL:[email protected])
- 怎么Adodc1.Recordest.find方法总出现错误?
- 如何学习好一个VB控件,讨论的都给分
- 还是读写二进制文件的问题
- 问一个ado的recordset.recordcount的问题?
- 实时采集到的数据绘制成曲线怎么是虚线?
- 在标准模块中用Public语句声明的类型在类模块里无法使用(加急~)
For x3 = yn To yn1
使用是没有问题的,但是在进入该语句之前,下 xn,yn,xn1,yn1的值必须确定
xn 要小于 xn1, yn 要小于 yn1 才能执行循环体,否则从大到小的话,要用 step 一个负数。
For x3 = yn To yn1
...
...
next x3
next y3
i=0
n=0
k=0for i = 1 to 300
for n= 1 to 100
k=k+1 next n
next i
Debug.Print k=30000
相同的方法 外循环3遍 里循环100遍i=0
n=0
k=0for i = 1 to 3
for n= 1 to 100
k=k+1 next n
next i
Debug.Print k=300
Dim intX as integer
Dim intY as integer
Dim intXStart as integer
dim intYStart as integer
Dim intXEnd as Integer
Dim intYEnd as integer
'此处初始化循环范围,只是举例
intXStart=0
intYStart=0
intXEnd=100
intYEnd=100
'进入循环体 ,如果intXStart小于intYEnd,那么Step后面的数据就应该是负数了,表示递减
For intX=intXStart to intXEnd Step 1
For intY=intYStart to intYEnd Step 1
'代码
next intY
next intX
以指定次数来重复执行一组语句。语法For counter = start To end [Step step]
[statements]
[Exit For]
[statements]Next [counter]For…Next 语句的语法具有以下几个部分:部分 描述
counter 必要参数。用做循环计数器的数值变量。这个变量不能是布尔或数组元素。
start 必要参数。counter 的初值。
End 必要参数,counter 的终值。
Step 可选参数。counter 的步长。如果没有指定,则 step 的缺省值为 1。
Statements 可选参数。放在 For 和 Next 之间的一条或多条语句,它们将被执行指定的次数。
说明step 参数可以是正数或负数。step 参数值决定循环的执行情况,如下所示:值 循环执行,如果
正数或 0 counter <= end
负数 counter >= end
当所有循环中的语句都执行后,step 的值会加到 counter 中。此时,循环中的语句可能会再次执行(基于循环开始执行时同样的测试),也可能是退出循环并从 Next 语句之后的语句继续执行。提示 在循环中改变 counter 的值,将会使程序代码的阅读和调试变得更加困难。循环中可以在任何位置放置任意个 Exit For 语句,随时退出循环。 Exit For经常在条件判断之后使用,例如 If...Then,并将控制权转移到紧接在 Next 之后的语句。可以将一个 For...Next 循环放置在另一个 For...Next 循环中,组成嵌套循环。不过在每个循环中的 counter 要使用不同的变量名。下面的体系结构是正确的:For I = 1 To 10
For J = 1 To 10
For K = 1 To 10
...
Next K
Next J
Next I注意 如果省略 Next 语句中的 counter,就像 counter 存在时一样执行。但如果 Next 语句在它相对应的 For 语句之前出现,则会产生错误。
For x3 = yn To yn1
其实是这里错了 反了 应该是for y3 = yn to yn1
for x3 = xn to xn1
而且for 与next 中间的语句块设置的有问题 但还是感谢大家
都说的很好 分数平均分了