vB.net语言编写N个数字数组排序可自定义数组长度的

Dim d() As Integer

成都创新互联公司是一家专注于成都网站建设、做网站与策划设计,拉孜网站建设哪家好?成都创新互联公司做网站,专注于网站建设十多年,网设计领域的专业建站公司;建站业务涵盖:拉孜等地区。拉孜做网站价格咨询:18980820575

Dim n As Integer

Dim i As Integer

Dim j As Integer

Dim T As Integer

n = Val(InputBox("请输入n，确定数组的元素个数"))

ReDim d(n)

'用随机函数生成正整数数组

Randomize

For i = 1 To n

d(i) = Int(Rnd * 100 + 1)

Next i

'输出

Print

For i = 1 To n

Print d(i),

Next i

'从小到大排序

For i = 1 To n - 1

For j = i + 1 To n

If d(i) d(j) Then

T = d(i)

d(i) = d(j)

d(j) = T

End If

Next j

Next i

'输出

Print

For i = 1 To n

Print d(i),

Next i

vb.net如何定义一维和多维数组

用一个带括号的变量名来定义一维数组和多维数组如dim a(5) as integer '定义了1个1维、6个元素数组dim a(5,5) as integer '定义了1个2维、36个元素的数组

vb.net 数组的定义方法

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}

在VB.NET中,使用Redim语句重新定义一个数组是,需要注意什么问题

1. 前提一定要声明一个数组,不需要赋值或者标明维数，例如dim a() as integer

2. 如果使用redim重新定义一个数组，数组里数据全部被初始化，要保留原有数据加上preserve

3 redim只能修改数据最后的维数，不能改变数组类型

4 redim 不能够全局声明

名称栏目：vb.net自定义数组,vbs定义数组
浏览地址：http://chengdu.cdxwcx.cn/article/hdpcse.html