数组中的第一个元素的下标称为下界，最后一个元素的下标称为上界，在VB．NET中，为了和其他语言更加易于协同操作，数组的下界均设定为0，不允许声明一个下界为1的数组，因此Option Base语句不再被VB．NET支持。
创新互联公司网站建设服务商，为中小企业提供网站设计、成都网站建设服务，网站设计，网站改版维护等一站式综合服务型公司，专业打造企业形象网站，让您在众多竞争对手中脱颖而出创新互联公司。
Dim a(20) As String
Dim num As Integer
Dim ppp As String = ""
Dim temp As String = ""
For i = 1 To 20
temp = ""
num = Int(Rnd() * 10 + 1)
For j = 1 To num
temp = temp Chr(Int(Rnd() * 26 + 97))
Next
a(i) = temp
Next
Dim max As Integer = 0
For i = 1 To 20
If a(i).Length max Then
max = a(i).Length
End If
Next
For i = 1 To 20
If a(i).Length = max Then
ppp = ppp "字符最多的元素是第" i "个元素" a(i) vbCrLf
End If
Next
For i = 1 To 20
TextBox1.Text = TextBox1.Text a(i).PadRight(10) " "
If i Mod 4 = 0 Then
TextBox1.Text = TextBox1.Text vbCrLf
End If
Next
TextBox1.Text = TextBox1.Text ppp
1、vb.net的
数组定义与变量定义差不多。可以用
dim
来定义
比如:
dim
a（100）
as
integer。
也可以不定义下标
在程序中
用
redim
来定义。
如：
dim
a()
as
integer
'
'
redim
a(100)
2、vb.net中定义数组可以直接赋值。
如：
dim
a()
as
integer
={1,
2,
3,4}