VB 如何定义字符串数组？？

Dim Str(100) As String
含有100个String类型的数组,其下标为:Str(0)到Str(99)

动态数组无法定义,只能根据需求定义一个理想状态下的数组,比如:
Dim Str(1000000) As String
或者更大....

如何定义一个String类型的动态数组？可以用dim A() as string，之后在程序根据需要redim A(100)重新定义就可以。

vb没啥难度啊
定义：
dim
aa(x)
as
string
'其中x是数组里元素数量，x从0开始
调用：
b=aa(0)
’赋值数组里第一个元素给b
赋值：
一般用循环，如：
for
...next语句
回答
dim
arr()
as
string
arr(i)
=
"abcd"
上边少一条语句，你用的arr（）
定义的是个动态数组，哥们看你语句像是学过c的，是把c的一些东西带到b来了
修改：
dim
arr()
as
string
arr()
=
"abcd"
再试一下吧

1、如何定义一个包含有100个String类型的数组。
Dim tStrings(99) As String
或：
Dim tStrings(0 To 99) As String
或：
Dim tStrings(1 To 100) As String

2、如何定义一个String类型的动态数组。
Dim tStrings() As String

如果你想定义它有100个元素，则这样定义。
ReDim tStrings(0 To 99)
或
ReDim tStrings(1 To 100)

ReDim会使数组内容全部丢失。

如果你只想重新定义数组大小，而保留数组的内容可以这样：
Dim tStrings() As String
ReDim tStrings(0 To 99)
ReDim Preserve tStrings(0 To 49)

Preserve参数保留数组原有内容。但假如你缩小了数组的上界，则后面的元素会丢失。比如上面的定义，49到100的以后的元素就丢失了。

但需要注意的是使用Preserve参数时数组下界不可以更改，比如：
Dim tStrings() As String
ReDim tStrings(51 To 100)
ReDim Preserve tStrings(0 To 100)
这样会出错。

而下面这样则是可以的：
Dim tStrings() As String
ReDim tStrings(0 To 100)
ReDim Preserve tStrings(0 To 49)