1、如果drs没有东西,for each里面的代码是不会执行的,如果有,里面的所有DataRow都不会是空的,所以下面判断代码是多余的
If dr IsNot Nothing Then
2、第二个SQLSelect后面的代码用了二个for循环,不明白有什么作用,第二个 For i As Integer = 0 To drs.Count - 1有什么意义?
For Each dr As DataRow In drs
If dr IsNot Nothing Then
For i As Integer = 0 To drs.Count - 1
3、drs(i).GetChildRows("一类疫苗出库表")------自己和自己关联?不建议这样用,尽量分成父子表的模式
4、不知道你表结构怎么样,我觉得二个SQLSelect可以拼成一个用的