Dim a, i% a=array(1,2,3,4,5,6,7) For i =Lbound(a) to Ubound(

Dim a, i% a=array(1,2,3,4,5,6,7) For i =Lbound(a) to Ubound(a) a(i)=a(i) *a(i) next i print a(i)
下标越界了,为什么啊

奔跑的蔷薇 1年前已收到1个回答举报

忧伤也是美丽花朵

共回答了19个问题采纳率：89.5% 举报

你定义的变量a是一个变量,应该定义成数组啊. 另外要考虑a(0)的问题,你是想使用a(0)~a(6)这七个分量还是想使用a(1)~a(7)这七个分量.

1年前追问

奔跑的蔷薇举报

a 已经是一个可变数组了啊，而且是用内部函数Lbound(a) 、 Ubound(a) 来获取下标的下上界的啊，怎么会越界？

举报忧伤也是美丽

下标越界的原因是由于i是循环变量，当执行完For i=Lbound(a) to Ubound(a)循环后，i的值应该是Ubound(a)+1，也就是7，而你所定义的数组下标只是从0到6，所以在最后一个print a(i)时，找不到a(7)，自然就越界了。

可能相似的问题

运行下列语句后,输出的结果是( ).Option Base 1 Dim a i=1 a=Array(1,-2,9,0,-

1年前1个回答
..Dim a() a=Array(1,3,5,7,9) s=0 For i=1 To 4 s=s*10+a(i) Ne

1年前1个回答
VB题目 option base0 dim a a =array(1,2,3,4,5,6,7,8,9) for i=0

1年前1个回答
英语翻译*DIM,TIME_STEP,ARRAY,18,*VFILL,TIME_STEP(1),DATA,0.005,0

1年前3个回答
下面程序运行后,输出结果为（）dim a（）a=Array(1,3,5,7,9)s=0For i=1 To 4s=s*1

1年前1个回答
手表上的英文缩写SAM：SUN：DIM：MON：LUN：TUE：MAR：WED：MER：THU：JEU：FRI：VEN：

1年前1个回答
英语翻译Dim s,i,j,arr(1 To 10),t,sumFor i = 1 To 10s = InputBox(

1年前1个回答
loose bowles ,reading in dim light,low income group,go out i

1年前2个回答
在Visual Basic中,语句Dim a(1 To 10) As String所定义的数组元素个数是 (A) 1 (

1年前1个回答
请帮忙解释下面语句意思-2'填写遗漏值 Dim n As Integer Dim arrR() As Integer,

1年前1个回答
ANSYS自动搜索相位角.我在一本书上看到自动搜索波流相位角的命令流如下,但不知结果在哪里看.*DIM,WLX,ARRA

1年前1个回答
求这道VB数组题的答案dim Arr(5,-3 to 3)as integer语句定义后,下列语句不正确的是A:Arr(

1年前1个回答
英语翻译which given a zero-indexed array A of N integers returns

1年前1个回答
英语翻译and,array,call,constant,else,elseif,endfunction,endgloba

1年前2个回答
1．下面的程序段运行后,显示的结果是 ______.Dim x% if X Then MsgBox(x)

1年前1个回答
Private Sub Command0_Click() Dim a(10, 10) For m = 2 To 4 Fo

1年前1个回答
VB编写三角函数的程序我是这么编写的里面中文是不会的地方dim a as integerdim bas integer

1年前1个回答
vb题下面程序的功能是什么?Private Sub Command1_Click() Dim s%,n% Dim a

1年前1个回答
有关VB定义变量的一些疑问Dim a,b as Integer这里是把a和b都定义成整形了吗?还是a为变体,b为整形?D

1年前1个回答

你能帮帮他们吗

精彩回答