Ejemplo en vb

1. Ejemplo en vb.net ¿Cómo programar un Botón para agregar registros a una base de datos?

2. Creamos una base de datos llamada Ejemplo_censo con una tabla llamada «personas_censadas».(Vista hoja de datos)

3. Vamos a Visual Studio 2012, elegimos el lenguaje de programación Visual Basic y Creamos la interfaz de nuestro formulario inicial.

4. Creamos un nuevo formulario llamado frmNuevoRegistroen la pestaña Proyecto agregar windowsforms… En esta pantalla colocamos un nombre al formulario y luego hacemos click en Agregar.

5. Diseñamos la interfaz del formulario… Inicialmente colocamos los campos y el botón Guardar con la propiedad Enabled = False para que estén desactivados… Haremos que se activen solo al hacer click en el Botón Nuevo.

6. Escribimos este código en el botón NUEVO:

7. Ahora, vamos a hacer que los registros vayan a nuestra base de datos…En primer lugar, importamos el espacio de nombres system.data.oledb que es el proveedor de datos de .netframework para ole db y describe una colección de clases que se utiliza para obtener acceso a un origen de datos ole db en el espacio administrado.(http://msdn.microsoft.com/es-es/library/system.data.oledb(v=vs.80).aspx)Hacemos doble click en el formulario frmNuevoRegistroy colocamos la siguiente línea antes de Publicclass…

8. Enlazamos la base de datos a nuestro proyecto tal como se explicó aquí, en Orígenes de datos  Agregar nuevo origen de datos.

9. Declaramos dos variables:una llamada conexión de tipo OleDbConnectiony una llamada comandos de tipo OleDbCommand.OleDbConnection: Representa una conexión abierta a un origen de datos.OleDbCommand: Representa una instrucción SQL o un procedimiento almacenado que se va a ejecutar en un origen de datos.

10. Vamos a programar el Evento Load del formulario, es decir, el procedimiento que se ejecutará al cargar el formulario: ¿Dé donde obtenemos esta cadena de conexión que se utiliza para abrir la Base de datos?

11. (1) Vamos a Orígenes de datos y hacemos Click en el botón Nuevo origen de datos (2) (3)

12. (4) En esta ventana, hacemos click en el botón + (5) copiamos la cadena de conexión que se muestra en el recuadro y luego podemos hacer click en Cancelar.

13. Programamos el botón Guardar: Continúa…

14. botón Guardar:Continuación…

15. Finalmente, programamos el botón Volver. Listo… Probemos a ver cómo funciona…

16. Vamos a verificar los registros que están almacenados en la base de datos antes de probar el programa creado… Ahora iniciamos la ejecución…

17. Aparece el formulario inicial que muestra las opciones disponibles… Hacemos click en el botón Nuevo Registro. Si funciona correctamente, deberá aparecernos este mensaje en pantalla que indica que nos hemos conectado a la base de datos, tal como lo indicamos al programar el evento Load del formulario.

18. A continuación, se muestra el formulario Nuevo Registro. Los campos y el botón Guardar están inicialmente desactivados… Hacemos Click en el botón Nuevo.

19. Como vemos acá, el botón nuevo queda activado al igual que los campos para permitir la escritura… Al completar la información correspondiente al registro que estamos llenando, hacemos click en el botón Guardar.

20. Al presionar el botón Guardar, si todo funciona correctamente, aparecerá un mensaje en pantalla indicando que el registro ha sido guardado tal como indicamos anteriormente. Hacemos click en Aceptar… Una vez guardado el registro de forma satisfactoria, se vuelven a desactivar los campos y el botón guardar.

21. Vamos a verificar si realmente se ha guardado el registro que acabamos de añadir… Acá está… ¡Ha funcionado! 

22. Ejemplo en vb.net ¿Cómo programar un Botón para ELIMINar registros a una base de datos?

23. Declaramos las variables que vamos a necesitar.

24. Diseñamos la interfaz del formulario frmEliminar… Colocamos todos los campos (excepto txtCedula) y el botón eliminar con la propiedad enabled = False.

25. Programamos el evento Load del formulario para que se abra la conexión al cargar.

26. Se programa el botón Buscar para cargar la información del registro en los campos del formulario y activar el botón Eliminar.

27. Programamos el botón Eliminar para que el usuario confirme que desea borrar el registro encontrado y a continuación ejecutar la consulta Deletecorrespondiente.

28. Finalmente, se programa el botón Volver para cerrar la conexión y regresar al formulario anterior.

29. Vamos a ver los registros que tenemos en nuestra base de datos… Supongamos que queremos eliminar el registro con la cédula 12333333… Iniciamos la ejecución del proyecto.

30. Aparece el formulario inicial que muestra las opciones disponibles… Hacemos click en el botón Eliminar registro. Si funciona correctamente, deberá aparecerá un mensaje en pantalla indicando que la conexión a la base de datos ha sido exitosa, como lo indicamos en el evento Load del formulario.

31. Al aparecer el formulario Eliminar, ingresamos la cédula en el campo correspondiente y hacemos click en el botón BUSCAR.

32. Presionamos el botón Buscary, si el registro existe en la base de datos, se muestra en los campos del formulario y se activa el botón Eliminar.

33. Presionamos el botón Eliminar Y se nos pide confirmar que deseamos borrar el registro. Presionamos Si y se muestra un mensaje en pantalla informando que el registro ha sido eliminado.

34. Ejemplo en vb.net ¿Cómo programar un Botón para Actualizar registros a una base de datos?

35. Diseñamos la interfaz del formulario frmActualizar… Colocamos todos los campos (excepto txtCedula) y los botones Modificar y Actualizar con la propiedad enabled = False.

36. Declaramos las variables que vamos a necesitar.

37. Programamos el evento Load del formulario para que se abra la conexión al cargar. Podemos obtener esta cadena de conexión desde orígenes de datos.

38. Programamos el botón Buscar para cargar la información del registro en los campos del formulario.

39. Se programa el botón Modificar para que active los campos permitiendo la escritura.

40. Programamos el botón Actualizar: Continúa…

41. La consulta completa para actualizar queda así: consulta_actualizar = "UPDATE personas_censadas SET cedula = " & txtCedula.Text & ", nombre = '" & txtNombre.Text & "', apellido = '" & txtApellido.Text & "', sexo = '" & ListSexo.Text & "', telefono = '" & txtTelefono.Text & "', correo = '" & txtCorreo.Text & "', nivel_instruccion = '" & ComboNivelInstruccion.Text & "' WHERE cedula = " & txtCedula.Text & " "

42. botón Actualizar (Continuación…):

43. Finalmente, programamos el botón Volver. Vamos a ver cómo funciona…

44. Vamos a ver los registros que tenemos en nuestra base de datos… Digamos que queremos actualizar el registro con la cédula 10111000… Iniciamos la ejecución del proyecto.

45. Aparece el formulario inicial que muestra las opciones disponibles… Hacemos click en el botón Actualizar registro. Si funciona correctamente, deberá aparecernos este mensaje en pantalla indicando que la conexión a la base de datos ha sido exitosa, tal como lo indicamos en el evento Load del formulario.

46. Al aparecer el formulario Actualizar, ingresamos la cédula en el campo correspondiente y hacemos click en el botón BUSCAR.

47. si existe un registro que cumpla con el criterio de selección, se cargará la información del mismo en los campos del formulario y se activarán los botones Modificar y Actualizar.

48. Hacemos click en el botón Modificar para que se activen los campos del formulario y se permita así la modificación de los campos correspondientes al registro encontrado.

49. Hacemos las modificaciones necesarias y presionamos el botón Actualizar. Si todo está bien, aparecerá un mensaje en pantalla informando que el registro ha sido actualizado.

50. Una vez actualizado el registro, se desactivan nuevamente los campos y los botones Modificar y Actualizar.