suhu vb.net mohon bantuannya, gimana membuat multiple MySqlDataReader??? Seperti coding di bawah ini

Do While reader.Read()
Dim sqlcmd As New MySqlCommand("SELECT YEAR(shipdate) AS tahun, MONTHNAME(shipdate) AS bulan " & _
"FROM pbtsoh WHERE shipdate>='" & tgl1 & "' AND shipdate<='" & tgl2 & "' " & _
"AND buyer_id='" & dread.GetString("SOR_CODE") & _
"' AND sales_id='" & dread.GetString("SLS_CODE") & "'" & _
sql2 & "GROUP BY YEAR(shipdate),MONTHNAME(shipdate) " & _
"ORDER BY shipdate DESC LIMIT 1", con2)
Dim dtr As MySqlDataReader = sqlcmd.ExecuteReader()
If dtr.Read() Then
tahun = dtr.GetString("tahun")
bulan = dtr.GetString("bulan")
End If
Loop
Saya memkakai connection string
codingnya =
Dim connString As String = "Database=pbt1;Data Source=localhost;User Id=root"

dan itupun saya juga memakai 3 ConnectionString dengan database yang sama, tapi tetep aja gak bisa. Ada Solusi

NB : "Saya juga menggunaka MultipleActiveResultSets tp malah error System.ArgumentException: Keyword not supported.
Parameter name: multipleactiveresultsets
codingnya
Dim connString As String = "Database=pbt1;Data Source=localhost;User Id=root;MultipleActiveResultSets=True"

"