Código para sumar
Buenas tardes y Gracias por adelantado necesitaría sumar una cantidad escrita en un textbox que al pulsar un botón dicha cantidad se sumara en un campo llamado total y que una vez sumada esta cantidad el textbox se pusiera a cero para poder incluir otra cantidad y de esta manera seguir sumando cuantas veces se quiera.por supuesto con access GRACIAS
1 Respuesta
Suponiendo que tu cuadro de texto se llama Cantidad (Propiedades-> Pestaña Otras-> Nombre), le tienes que programar el siguiente código a tu botón (Propiedades-> Pestaña Eventos->Al hacer Click-> pulsas el botón de los 3 puntos que aparece a la derecha y pulsas generador de código):
Private Sub NombreBoton_Click()
'Comprobamos que se ha escrito algo, si no salimos sin hacer nada
If IsNull(Me.Cantidad) Then Exit Sub
'Comprobamos que se ha escrito un número
If Not IsNumeric(Me.Cantidad) Then
MsgBox "Tienes que escribir un número", vbInformation,"ERROR"
Me.Cantidad=0
Exit Sub
End If
'Hechas las comprobaciones, sumamos al campo Total
Me.Total=Nz(Me.Total,0)+Me.Cantidad
'Ponemos el cuadro de texto cantidad a 0
Me.Cantidad=0
End Sub
Lo que está en negrita será lo que tendrás que cambiar por los nombres que tu tengas.
Muchísimas Gracias me ha servido muy bien Gracias estoy aprendiendo access y la verdad es que me has ayudado mucho, con este código mi ultima pregunta es en que pagina puedo aprender mas sobre access si me puedes aconsejar, de todas formas GRACIAS.
