13518219792
Dim S As String()
我们提供的服务有：成都网站设计、成都网站制作、微信公众号开发、网站优化、网站认证、绿春ssl等。为近1000家企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务，是有科学管理、有技术的绿春网站制作公司
Dim j As Integer = 9
ReDim S(j)
For i = 0 To j
S(i) = i
Next
注: 指定数组上限才能对其赋值
是这么定义的：
数组中的第一个元素的下标称为下界，最后一个元素的下标称为上界，其余的元素连续地分布在上下界之间，且数组在内存中也是用连续的区域来存储的，所以数组每维的长度不能超过Long数据类型的最大值，即264—1=263。
把VB．NET数组当作一个对象来处理，就意味着数组类型是单个引用类型，数组变量包括指向构成数组元素、数组维和数组长度等数据的指针，数组之间互相赋值但仅仅是在相互复制指针，数组继承了System名字空间的Array类。
VB．NET中的数组有两种类型：定长数组和动态数组。
扩展资料：
1、数组的使用
在’VB 6．0中，能够用For Each来循环遍历一个数组。
比如：
Dim x As Integer
F0r Each x In arrayl
Console．WriteLine(x)
Next
2、在VB．NET中能够使用For循环和数组长度来遍历一个数组。
比如：
Dim i As工nteger
F0r i=0 T0 (arrayl．Length-1)
（此处空一行）
Console．WriteLine(arrayl(1)J
Next i
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}
1.你说的这个有点问题,是要只输出一次,也可做,
2.但问题是如果你数组还有就看不到了!这个做法有点问题
1.解决方法:
循环前面加入一个变量 dim Temp as Double=0
For i = 0 To 9
If score(i) avg and score(i)temp Then
TextBox3.Text = TextBox3.Text score(i) " "
if score(i)=avg then
temp=score(i)
end if
End If
Next
结构体无法初始化值，你可以用类实现，或者写一个构造函数，把值传进去。
Public Structure wheelmodel
Public ID As Short
Public swapway() As Short
Public start As Short
Public Sub New(ByVal Size As UShort) 'Size就是传入的数组的大小
swapway = New Short(Size) {}
End Sub
End Structure
调用的时候：
Dim x As wheelmodel = New wheelmodel(10)
