Ver Mensaje Individual
  #4 (permalink)  
Antiguo 26/05/2009, 20:00
tekopaginas
 
Fecha de Ingreso: mayo-2009
Mensajes: 1
Antigüedad: 15 años
Puntos: 0
Pregunta

por ejemplo hago una consulta para mostrar un dato que busqué asi cmo el siguiente codigo:


Private dt As DataTable
Private da As OleDb.OleDbDataAdapter
Private fila As Integer

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim sCnn As String = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=C:\BaseDatos.accdb"
Dim sSel As String = "SELECT * FROM compras where cod_proveedor = " & TextBox5.text & " ORDER BY cod_compra"
da = New OleDb.OleDbDataAdapter(sSel, sCnn)
dt = New DataTable
da.Fill(dt)
mostrardatos() mi duda es aqui como se que fila da el resultado de la busqueda????
End Sub

Private Sub mostrardatos(ByVal f As Integer)
Dim uf As Integer = dt.Rows.Count - 1
If f < 0 OrElse uf < 0 Then Exit Sub
Dim dr As DataRow = dt.Rows(f)
TextBox1.Text = dr("Cod_compra").ToString
TextBox2.Text = dr("cod_provee").ToString
TextBox3.Text = dr("cod_factura").ToString
TextBox4.Text = dr("no_factura").ToString
End Sub



porfavor me pueden ayudar!!!!