9.二维数组,针对第二维进行循环
Private Sub insertMatchData(ByVal data As Object(,))
For j = 0 To UBound(data, 2) Step 1
注: 逗号后面的第二个参数指定为数组的第几维。
Ubound返回的是指定维数的index
(如:数组data第二维有三个项目,item(0)~item(2),则UBound(data, 2)返回的结果是2)
10.相对应java中的switch ,vb.net是select
Select Casetype
Case TYPE_D
' 地区级别
' 什么都不需要做
Case TYPE_R
' 大区级别
code = data.code.Substring(0, 3)
repeatKey = code + saledate
' 大区code重复确认
For i = 0 To region.Count - 1 Step 1
&nbs
Private Sub insertMatchData(ByVal data As Object(,))
For j = 0 To UBound(data, 2) Step 1
注: 逗号后面的第二个参数指定为数组的第几维。
Ubound返回的是指定维数的index
(如:数组data第二维有三个项目,item(0)~item(2),则UBound(data, 2)返回的结果是2)
10.相对应java中的switch ,vb.net是select
Select Casetype
Case TYPE_D
' 地区级别
' 什么都不需要做
Case TYPE_R
' 大区级别
code = data.code.Substring(0, 3)
repeatKey = code + saledate
' 大区code重复确认
For i = 0 To region.Count - 1 Step 1
&nbs