[Resolvido] result set com mySQL

Pessoal sou noobie aqui no forum e também em ASP .NET, gostaria de saber como tratar um resultado de uma SQL que deve retornar o número de registros de uma select, veja exemplo do código abaixo (estou perdido aqui porque venho do Delphi e o ambiente GUI do Visual Studio 2008 é bem diferente, mas aos poucos vou me adaptando):

 

 Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

 Dim Codigo, TotProd As Integer

 Dim strSQL, strSQL1, strSQL2, Staff, rs, rsc As String

 Dim Test As Boolean

 'Dim rsc As Collection

 

 Test = Inicializa.IncluiColuna

 

 IncluiColunas()

 

 Codigo = Val(Me.TextBox1.Text)

 

 **strSQL2 = "SELECT Count(Pro_codigo) FROM produto2 WHERE (Pro_codigo ='" & Codigo & "'" & ")"**

 

 Da2 = New MySqlDataAdapter(strSQL2, conexaoMySQL)

 Ds2 = New Data.DataSet

 cmd2.Connection = conexaoMySQL

 cmd2.CommandText = strSQL2.ToString

 

 Da2.Fill(Ds2)

 

 dr = Ds2.Tables(0).Rows(0)

 

 'TotProd = CInt(New ListItem(Ds2.Tables(0).Rows.ToString()))

 

 Staff = Ds2.Tables(0).Rows(0).ToString()

 

 rsc = Ds2.Tables(0).Rows.Item(0).ToString

 

 Dim Resultado As ListItem

 

 rs = Ds2.Tables(0).Rows.ToString()

 

 Staff = rs(0).ToString()

 

 'MsgBox(MsgBoxStyle.OkOnly, Cm.CommandText)

 

 strSQL = "SELECT Pro_codigo, Pro_descricao, Pro_qtd, Pro_valor, Pro_status FROM produto2 WHERE (Pro_codigo ='" & Codigo & "'" & ")"

 

 Da = New MySqlDataAdapter(strSQL, conexaoMySQL)

 Ds = New Data.DataSet

 

 Cm.Connection = conexaoMySQL

 Cm.CommandText = strSQL.ToString

 

 'MsgBox(MsgBoxStyle.OkOnly, Cm.CommandText)

 

 Da.Fill(Ds)

 GridView1.DataSource = Ds

 GridView1.DataBind()

 

 GridView1.Visible = True

 

 strSQL1 = "SELECT v.Ven_codigo, v.Ven_produto, v.Ven_qtd, v.Ven_data, v.Ven_valor, v.Ven_status FROM vendas2 v JOIN produto2 p ON (p.Pro_codigo = v.Ven_produto) WHERE (v.Ven_produto ='" & Codigo & "'" & ")"

 SqlDataSource2.SelectCommand() = strSQL1

 GridView2.Visible = True

 

 End Sub

 

Como que eu faço para pegar o valor desta select: strSQL2 = "SELECT Count(Pro_codigo) FROM produto2 WHERE (Pro_codigo ='" & Codigo & "'" & ")"?

Agradeço antecipadamente a ajuda,

DruidCtba