Curso gratis de Visual Basic tratamiento de errores - programación en Microsoft Visual Basic

Curso de Visual Basic facil Otros Curso guitarra Negocios en Internet Curso Biblia Curso de Access Curso de reparación en PC Curso de Linux Introducción a redes Seguime en	Curso gratis de Visual Basic Base de datos asistente, evento validate, reposition y variables en programación   25. Base de datos asistente y ejemplo Ahora que ha aprendido a ser una base de datos con los objetos y códigos correspondientes, le comentaré la existencia de un asistente: Barra de menú complementos, administrador de complementos, Vb Data form wizard, cargar. Ahora este asistente aparecerá en el menú Complementos. Actívelo. Aparecerá una nueva ventana que se llama Asistente para formulario de datos:    En perfil pulse en Siguiente ya que el predeterminado le irá bien. En formato de dato seleccione Access de ser este. En nombre de base de datos, deberá seleccionar la base de datos que halla realizado. Póngale un nombre al formulario y seleccione en la parte de abajo un estilo. En origen de registro, seleccione el nombre que le puso, abajo agregue los campos que se incluirán en la aplicación. Seleccione los botones que se  -curso dado en estudiargratis.com.ar- incluirán. Una vez que ya se ha terminado con el asistente ir a  proyecto, propiedades de proyecto, y en la solapa general, como principal seleccione lo que ha hecho en el asistente. Esta es una forma de realizar una aplicación de base de datos de forma muy sencilla.   Vamos a seguir viendo un poco de código para que no dependa de un asistente para realizar algo. Validate: Evento que se puede agregar al control data. Utilice el evento Validate para comprobar los datos, antes de guardar un registro en la base de datos. Este evento se produce justo antes de que Visual Basic escriba en la base de datos, los cambios procedentes de los controles enlazados y de que vuelva a colocar el puntero del registro actual en otro registro de la base de datos. Private Sub Data1_Validate (index As Integer, action As Integer, save As Integer)   Donde: El argumento action: Es la operación que provoca que se ejecute este evento, el cual puede ser llamado por: MoveFirst, MovePrevious, MoveNext, MoveLast, AddNew, Update, Delete, Find, cerrar la base de datos, descargar el formulario.    Salve: es para salvar o no, irá true o false. Ejemplo: Private Sub Data1_Validate (Action As Integer, Save As Integer)            Dim iResponse As Integer (variables para msgbox)            If Save = True Then                            iResponse = MsgBox ("Guardar cambios?", vbYesNo)                            If iResponse = vbNo Then                                            Save = False                                            Data1.UpdateControls ' Actualiza campos.                            End If            End If End Sub     Notas si usamos guardar "UpdateRecord" se guardará de una, si usamos este código preguntará.   Reposition: Utilice el evento Reposition para modificar la apariencia de un formulario o realizar una acción necesaria cuando se desplace a un nuevo registro. Ejemplo tonto de reposition en data: Private Sub Data1_reposition()  Data1.Caption = "para adelante +1 atras -1:" & _             Data1.Recordset.AbsolutePosition + 1 End Sub   Nota: Las variables se las puede declarar con los siguientes signos: Dim unNumero               % Dim unNumeroLargo      & Dim otroNumero             ! Dim masNumeros          # Dim unNombre               $ Error: Acá hay un ejemplo sacado de mastering para tratamiento de error al avanzar a un nuevo registro, habiendo duplicado el ide en caso de realizar una base en la que no se lo pueda duplicar:   Private Sub Data1_Error(DataErr As Integer, Response As Integer)            If DataErr = 3022 Then 'Error de clave duplicada                            MsgBox "Escriba un número de Id. de empleado único"                            txtEmpID.SetFocus                            Response = 0            Else                            Response = 1 'muestra el mensaje de error estándar            End If End Sub     [Educación arte cultura entretenimientos y cursos gratis] > [Curso de Visual Basic]   Búsqueda personalizada
	Autor y Webmaster: Javier R. Cinacchi - Aclaraciones legales y política de privacidad (Prohibida la reproducción parcial o total  del contenido de esta Web sin el consentimiento escrito del autor. Puede poner un link a esta pagina.)