在VB.net中数组怎么动态设置大小

用排序就好了, 分别取出首尾6个元素

专注于为中小企业提供成都做网站、网站建设服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业修文免费做网站提供优质的服务。我们立足成都，凝聚了一批互联网行业人才，有力地推动了上千多家企业的稳健成长，帮助中小企业通过网站建设实现规模扩充和转变。

dim arr()

'''''''

redim arr(5)

arr(0) = 100

arr(1) = 435

arr(2) = 800

arr(3) = 220

arr(4) = 50

arr(5) = 999

Dim x, y, b, tmp

for y = 0 to ubound(arr)

b = true

for x = 0 to ubound(arr) - 1

if arr(x) arr(x+1) then

tmp = arr(x)

arr(x) = arr(x+1)

arr(x+1) = tmp

b = false

end if

next

if b then exit for

next

dim content

for each x in arr

content = content x chr(13)

next

content = content "min-" arr(0) " - " arr(1) " - " arr(2) chr(13)

content = content "max-" arr(ubound(arr)) " - "

arr(ubound(arr) - 1) " - " arr(ubound(arr) - 2)

chr(13)

msgbox content

VB.NET 数组内容比较大小

'给数组赋值

dim d(6) as integer

d(1)=11

d(2)=32

d(3)=25

d(4)=45

d(5)=9

d(6)=5

'获取最大值（采用打擂台的思路）

dim MyMax as integer

dim i as integer

MyMax = d(1) '假设第1个元素最大

for i = 2 To Ubound(d) '从第2个元素开始到最后一个元素

'如果当前元素比MyMax的值大，就把当前元素保存到MyMax

if d(i) MyMax Then

MyMax = d(i)

end if

next i

msgbox MyMax

vb.net中如何确定数组的大小

dim a(x to n,m to i) 就是定义了个有(n-m+1)*(i-m+1)个元素的数组其他一维和多维的类似

求指点 vb.net Structure 里面 怎么定义数组大小呢?

那就是不能初始长度了，而且结构中定义个无参数的构造函数也不行，所以无法初始长度。

这有必要吗，在使用时重定义它的长度也可以。

Structure MODULEENTRY32

Dim Size As Integer

Dim Mid As Integer

Dim pid As Integer

Dim gusage As Integer

Dim pusage As Integer

Dim base As Integer

Dim 大小 As Integer

Dim 句柄 As Integer

Dim 文件名() As Byte

Dim 完整路径() As Byte

Sub t()

文件名 = Array.CreateInstance(GetType(Byte), 45) '建立数组

ReDim 文件名(45) '定义数组长度，其实数组也是对象，相当生成个实例。

文件名 = System.Text.ASCIIEncoding.ASCII.GetBytes("c:\windows\test.txt") '这两个数组内容多半是从字符串转换而来的，根本就不需要初始长度

End Sub

本文名称：vb.net的数组大小 vbnet byte数组
文章起源：http://kswjz.com/article/dddpegj.html