主题：[求助]如何将字符串中表示时间的串转换为日期

Dim cnt  As integer = 5  '统计表个数
for i as integer = 1 to cnt
    Dim b As New GroupTableBuilder("统计表" & cnt ,DataTables("订单"))
    ...
next
dim dt1 As datatable = DataTables("统计表1")
for i as integer =2 to cnt
   dt1.Combine("型号",dataTables("统计表" & i),"型号") '将销售统计数据组合到进货统计数据
next
...

 

Dim cnt  As integer

这列写代码，计算出表的个数，赋值给cnt
for i as integer = 1 to cnt
    Dim b As New GroupTableBuilder("统计表" & cnt ,DataTables("订单"))
    ...
next
dim dt1 As datatable = DataTables("统计表1")
for i as integer =2 to cnt
   dt1.Combine("型号",dataTables("统计表" & i),"型号") '将销售统计数据组合到进货统计数据
next

Dim cnt  As Integer
这列写代码,计算出表的个数,赋值给cnt
Dim dts(cnt) As fxDataSource
For i As Integer = 1 To cnt
    Dim b As New GroupTableBuilder("统计表" & i ,DataTables("订单"))
    ...
   dts(i) = b.BuildDatasource
Next
For i As Integer =2 To cnt
   dts(1).Combine("型号",dts(i),"型号") '将销售统计数据组合到进货统计数据
Next

既然你要用split分割，spilit之后，数组的长度就是你要的，数组有length属性。

 

Dim  Multi As String = "ab|cd|ef"
Dim Values() As String
Values = Multi.split("|")
messagebox.show(values.Length)