Título: Necesito conectar Access 2003 con visual Basic .net 2005 Publicado por: Redfhield [Ap0cALIpsIs] en 17 Octubre 2007, 23:28 pm por ejemplo si al usuario le pido en 4 textbox ingresar valor1, valor2, valor3, valor4 y tengo un boton guardar... ¿con que codigo configuro ese boton? si alguien me puede ayudar con este problema se lo agradeceria mucho
tal ves no sea muy claro... diganme y subo una imagen o el codigo de lo que estoy haciendo ;D Título: Re: Necesito conectar Access 2003 con visual Basic .net 2005 Publicado por: Redfhield [Ap0cALIpsIs] en 17 Octubre 2007, 23:30 pm aqui hay una imagen del sistema que quiero lograr
(http://www.imaxenes.com/mini/imaxen11rd07ku.jpg) (http://www.imaxenes.com/imagen/imaxen11rd07ku.jpg.html) Ver Imagen en tamaño Real : imaxen11rd07ku.jpg (http://www.imaxenes.com/imagen/imaxen11rd07ku.jpg.html) y esta es la base de datos (http://www.imaxenes.com/mini/base_de_datos1pm96ef.jpg) (http://www.imaxenes.com/imagen/base_de_datos1pm96ef.jpg.html) Ver Imagen en tamaño Real : base_de_datos1pm96ef.jpg (http://www.imaxenes.com/imagen/base_de_datos1pm96ef.jpg.html) e escuchado que access es una ***** como base de datos pero es importante para mi aprenderlo Título: Re: Necesito conectar Access 2003 con visual Basic .net 2005 Publicado por: Redfhield [Ap0cALIpsIs] en 17 Octubre 2007, 23:32 pm si necesitan una idea de como funciona aqui esta el codigo que genere para el es muy corto y muy simple
Public Class caja Public acum As Double Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If IsNumeric(cibercontrol.Text) = False Then cibercontrol.Text = 0 End If If IsNumeric(egreso1.Text) = False Then egreso1.Text = 0 End If If IsNumeric(egreso2.Text) = False Then egreso2.Text = 0 End If If IsNumeric(egreso3.Text) = False Then egreso3.Text = 0 End If If IsNumeric(egreso4.Text) = False Then egreso4.Text = 0 End If If IsNumeric(egreso5.Text) = False Then egreso5.Text = 0 End If If IsNumeric(ingresos.Text) = False Then ingresos.Text = 0 End If If IsNumeric(efectivo.Text) = False Then efectivo.Text = 0 End If acum = CDec(egreso1.Text) + CDec(egreso2.Text) + CDec(egreso3.Text) + CDec(egreso4.Text) + CDec(egreso5.Text) totalegreso.Text = acum acum = 0 acum = (CDec(cibercontrol.Text) + CDec(ingresos.Text)) - CDec(totalegreso.Text) diferencia.Text = CDec(efectivo.Text) - CDec(acum) End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Me.Close() End Sub Private Sub Guardar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Guardar.Click aqui se supone que deberia ir el codigo que permita guardar el contenido de los textbox en la base de datos... es esto lo que nose hacer End Sub End Class agradezco mucho a quienes me quieran ayudar |