求助,如何用excel vba定义一个数组并给这个数组内的数排序

发布网友

我来回答

2个回答

热心网友

定义数组
dim arr() as string ' 此处定义一个0索引的字符串数组
redim arr(1 to 100) '对数组进行重定义长度为100(常量100也可以是已经初始化的变量)
排序有很多方法,冒泡法、插入法、选择法之类的,这要看你的数组要素的类型和你排序的方式,简单点的看如下示例:
...
dim arr(1 to 5) as integer,i!,tmp as double
... ' 此处省略了为数组arr赋值的代码
for i =1 to ubound(arr)-1
tmp=arr(i)
if tmp>arr(i+1) then arr(i)=arr(i+1) '数据将从小到大排列
arr(i+1)=tmp
next

热心网友

dim arr(1 to 100)
定义一个数组,有从1到100,可以存100个数据,具体数据类型,楼主根据需求来
另外数组内数据排序方法很多,最简单的冒泡排序法
两层for循环即可

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com