现在有一个二维数组,由于是动态定义的,不知道大小,所以我想使用For Each...Next 来操作,该如何写代码呢?感谢各位高手。
解决方案 »
- xml文件读取,结构复杂的xml```求教大神
- 为什么在本地窗口,看不到变量内容?
- VB中如何引用MSDN中的SHell interface
- 如何修改字符串里某一个字符
- 如何用VB编程实现启动SQL server服务器?
- connection对象的使用..
- 请问各位老师,在vb中怎样才能获取硬盘的序列号
- 如何用数据环境设计器连接带密码的ACCESS数据库(给分100)
- vb做的dll和vc做的dll有什么本质区别啊?
- 高分求教MS MASKED EDIT CONTROL控件的用法,最好有范例
- 在VB中如何实现图片的打印,请高手指点!!!!!急用!!!!!!
- ■■■■vb中文件,类,控件,模块多少行,多大多少数量为好?最笨的最有效的最重要的最简单的最****的问题
Dim a() As Integer
ReDim a(1 To 2, 1 To 3)
a(1, 1) = 1
a(1, 2) = 2
a(1, 3) = 3
a(2, 1) = 4
a(2, 2) = 5
a(2, 3) = 6
Dim s As Integer
s = 0
For Each b In a
s = s + b
Next
MsgBox s
End Sub