vb中的数组怎么用

ladofwind 2004-11-24 10:08:51
dim a() as long

a(0)=8
不行啊,给个例子
我的数组长度是根据动态得到的
dim a(num) as long
也不行啊
...全文
198 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
baozhiliu 2004-11-24
  • 打赏
  • 举报
回复
dim a(n) as long 'n为整数的长整型一维数组
dim a(n,m) as long 'n,m为整数的长整型二维数组
viena 2004-11-24
  • 打赏
  • 举报
回复
每次执行 ReDim 语句时,当前存储在数组中的值都会全部丢失

有时希望改变数组大小又不丢失数组中的数据。使用具有 Preserve 关键字的 ReDim 语句就可做到这点。例如,使用 UBound 函数引用上界,使数组扩大、增加一个元素,而现有元素的值并未丢失:

ReDim Preserve DynArray (UBound (DynArray) + 1)

在用 Preserve 关键字时,只能改变多维数组中最后一维的上界;如果改变了其它维或最后一维的下界,那么运行时就会出错
creazyfish 2004-11-24
  • 打赏
  • 举报
回复
同意楼上各位呵呵
ABCatai 2004-11-24
  • 打赏
  • 举报
回复
动态定义数组:
dim a() as long '先声明一个没有下标的数组
redim a(num) as long ‘向a()中定义下标个数num
viena 2004-11-24
  • 打赏
  • 举报
回复
dim a() as long
redim a(num) as long
a(0)=8

flyingZFX 2004-11-24
  • 打赏
  • 举报
回复
redim a(8)
aiur2000 2004-11-24
  • 打赏
  • 举报
回复
dim a(8) as long '表示有8个数的数组
========================

dim a() as long
redim a(8) ‘动态定义数组长度
cosio 2004-11-24
  • 打赏
  • 举报
回复
dim a() as long
就是这样子的!
True1024 2004-11-24
  • 打赏
  • 举报
回复
ReDim a(num) as long
aiur2000 2004-11-24
  • 打赏
  • 举报
回复
redim a(8)

7,762

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧