Question

VB b=val(text1.text)-1 dim a(b) as Integer 这样写出现 要求常数表达式

那么如何定义一个数组变量且括号里面的值等于text1.text的值减去1呢，，，

Answer 1

dim语句定义数组时，必须用确定的数字，如dim a(10)，不能用变量
如果不能确定数组维数，可以定义动态数组，如：
dim a()
b=10
redim a(b)

Answer 2

在最开始，dim 数组（）
在text1的值确定以后（要自己编写代码保证text1是一个合适的数值）
然后，redim 数组（int（text1）-1）

Answer 3

要是直接定义数组的话，数组的元素个数必须是个常数或者常值的变量。
要想根据变量的值来改变数组的元素个数必须用动态数组，也就是“dim a() as integer"----"redim [preserve] a(i)"的形式(其中i是任意变量）。

这些都是visual Basic硬性的规定，改不了的。