求助帖关于LBound UBound函数

bcy8728

我在VBE 里输入这组代码（就是别怕里第65页的那组代码），为什么系统给我这个提示，求大神指点哪里有问题
Sub arrount()
Dim arr(10 To 50)
MsgBox "数据的最大索引号是：" & UBound(arr) & Chr(13)
       & "数据的最小索引号是：" & LBound(arr) & Chr(13)
      & " 数组元素的个数是：" & ubound(arr)-lbound（arr)+1
      End Sub

hehex

Sub arrount()
Dim arr(10 To 50)
MsgBox "数据的最大索引号是：" & UBound(arr) & Chr(13)_
       & "数据的最小索引号是：" & LBound(arr) & Chr(13)_
      & " 数组元素的个数是：" & ubound(arr)-lbound（arr)+1
      End Sub
看后面你漏掉了_ ，下划线在vba 中代表是换行后仍然是上一条语句的延续。
后面2句都是Msgbox 语句的延续，直接回车系统认为
& "数据的最小索引号是：" & LBound(arr) & Chr(13)
& " 数组元素的个数是：" & ubound(arr)-lbound（arr)+1
是独立的两句话，从语法上看当然是错的。

股网金来

你漏掉了 _
(下划线之前还要有一个空格)