jwbf.net
当前位置:首页 >> VB题,重点解释下For i = 1 To UBounD(B) B(i) = 2... >>

VB题,重点解释下For i = 1 To UBounD(B) B(i) = 2...

Private Sub pl(b() As Integer) For i = 1 To UBound(b) 'ubound(b)即返回一个 Long 型数据,其值为指定的数组维可用的 最大下标即3,该句等同于 for i=1 to 3 b(i) = 2 * b(i) '把传过来的数组a(1 to 3)逐个*2 Next i End Sub Private Sub Comm...

Option Base :在模块级别中使用,用来声明数组下标的缺省下界。 如果没有Option Base,数组下标从0开始,如dim a(10)为11项,从0到10; Option Base 1:数组下标从1开始,如dim a(10)为10项,从1到10。 For i = LBound(b) To UBound(b):从下标...

For i = 1 To 4 For j = 1 To 5 b(i) = b(i) + a(i, j) Next j Next i For i = 1 To 4 If b(i) > Max Then '

Private Sub Command1_Click() Randomize Print "产生20个0~10之间的随机整数:" Dim a(20) As Integer Dim b(10) As Integer For i = 1 To 20 a(i) = Int(Rnd * 11) Print a(i); If i Mod 10 = 0 Then Print Next i For i = 1 To 20 b(a(i)) = ...

b=1 i=1 Do Until b> 10 i=b*(b+1) b=b+1 loop print i 2612203042567290110

每行输出十个是与这个无关的,而是由循环 J 以及 Print语句完成的; 分析 For j = 1 To 10 B(i, j) = A((i - 1) * 10 + j) Print B(i, j); '分号的作用:使得输出的数据在同一行 Next j Print '输出一个换行 其中: Print B(i, j); 分号,使得输...

第1题的输出结果是$$$ Tab[(n)]可选的 n 参数是在显示或打印列表中的下一个表达式之前移动的列数。 例如Print tab(10);"$",$将在第10列出现

是2012年的问题了 想必楼主已经知道了答案 看了上面的答案解释的不是很清晰,我这里放一个清晰版的 以便以后的筒子们看 当最后一行加上输出语句时printf("%d,%d",k,b); 输出结果为 k=8,b=-2 现在 我们来模拟一下 for循环中 当i=5时的运行情况 ——...

Private Sub Command1_Click()Dim a(1 To 10) As IntegerDim i As IntegerFor i = 1 To 10a(i) = i * iiList1.AddItem Str(a(i))NextEnd Sub前面的循环结束的时候next I是11了,a最大才10,所以下标越界

Option Base是用来设定缺省下界的,Option Base 1就是将缺省下界设置为1(如果没有这句或者是Option Base 0则默认为0),比如说Dim a(10) As Integer,如果前面没有Option Base 1,那么它的下界就是0,也就是说你的a数组一共有a(0)到a(10)共11个...

网站首页 | 网站地图
All rights reserved Powered by www.jwbf.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com