DataAdapter问题：

Question

Const strSQL1 As String = "select……"
Const strSQL2 As String = "select……"
Const strCNN As String = "initial catalog=nzdb;user id=sa;password=neary"
Dim myDA As New SqlClient.SqlDataAdapter(strSQL1, strCNN)
Dim myDS As New DataSet()
With myDA
     .Fill(myDS, "dbStat")
End With
myDA = new SqlClient.SqlDataAdapter(strSQL2, strCNN)
With myDA
     .Fill(myDS, "dbStat2")
End With