静态数组能不能像动态数组那样,把初值一次赋进去呢?

bpudaye 2004-01-15 11:15:10
动态的:
dim ary
ary = Array(6, 10, 60, 30, 2)

那我想定义一个 dim ary(1 to 5) as Integer
这样的下标为1的数组

怎么能一下把初值都赋进去呢?

...全文
106 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
northwolves 2004-01-15
  • 打赏
  • 举报
回复
Option Base 1
Private Sub Command1_Click()
Dim ary
ary = Array(6, 10, 60, 30, 2)
MsgBox ary(2)
End Sub
northwolves 2004-01-15
  • 打赏
  • 举报
回复
Dim ary(1 To 5) As Integer, i As Integer
For i = 1 To 5
ary(i) = Choose(i, 11, 22, 33, 44, 55)
Next
MsgBox ary(2)

7,759

社区成员

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

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