Por que mejor no usas un datatable o un dataset en vez de un cursor, te olvidarias de la cantidad de registros que te devuelve:
Código vb:
Ver originaltry
Dim meDataTable As DataTable
Dim con As SqlClient.SqlDataAdapter
con = New SqlClient.SqlDataAdapter("SELECT * FROM EPSCOMFACOR.EPSBDUAOK", "conection string")
con.Fill(meDataTable)
dgvCon.DataSource = meDataTable.DefaultView
Catch ex As Exception
MsgBox("Error " & ex.Message & " Consulte al soporte")
sbMensaje.Text = "Ocurrio el error " & ex.Message & " al consultar los datos del pedido, por favor reintente y si el problema persiste contacte a su soporte"
End Try
y listo, si al final todas las columnas de la consulta las vas a mostrar. Si necesitas saber la cantidad de registros que te devuelve:
meDataTable.rows.count