Lista de Cotejo Prctica # 14 Insercin, Actualizacin y Borrado de informacin.
Nombre de la Materia: Programacin Bsica Instructor: Ing. Sergio Gonzlez Prez Alumno: Anahi Yissel Aguilar Hernndez Plantel: Grupo: Fecha de aplicacin : Conalep Jurez I 5102 30 / 09 / 2011
INSTRUCCIONES DE APLICACIN.
Verifique que se encuentren los componentes sealados abajo y marque con una el registro de cumplimiento correspondiente.
DESARROLLO
REGISTRO DE CUMPLIMIENTO
No
Caractersticas a verificar
Inicia el Sistema Gestor de Base de Datos Abre la Base de Datos que ser utilizada Realiza los pasos de la practica Manipula correctamente el SGBD
Almacena en su carpeta las actividades planteadas
OBSERVACIONES
SI
1 2 3 4 5 6
NO
/ / / / / /
REGISTRO DE
Realiza el reporte del resultado del programa.
No
Actividades a desarrollar
Abre la Base De Datos Realiza Insercin de Datos Realiza Modificacin de Datos Realiza Eliminacin de Datos
CUMPLIMIENTO
OBSERVACIONES
SI
1 2 3 4
NO
/ / / /
Anahi Yissel Aguilar Hernndez
Firma del Alumnos
Firma del Instructor
Cdigo
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click cn.Open() Dim Inner As String = "SELECT* FROM Maestros INNER JOIN Asignatura ON Maestros.Claveprofe = Asignatura.Claveprofe;" Dim dataAdapter As New OleDb.OleDbDataAdapter(Inner, cn) dataAdapter.Fill(dt) For Me.fila = 0 To dt.Rows.Count - 1 Step 1 ListBox1.Items.Add(dt.Rows(fila)("Nombre")) Next fila dataAdapter.Dispose() cn.Close() End Sub End Class
Codigo 2
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click cn.Open() Dim Insertar As String = "Insert into Maestros(Claveprofe,Nombre,Paterno,Materno)" & "Values('" & TextBox1.Text() & "','" & TextBox2.Text() & "','" & TextBox3.Text() & "','" & TextBox4.Text() & "')" Dim dataAdapter As New OleDb.OleDbDataAdapter(Insertar, cn) dataAdapter.Fill(dt) For Me.fila = 0 To dt.Rows.Count - 1 Step 1 ListBox1.Items.Add(dt.Rows(fila)("Nombre")) Next fila dataAdapter.Dispose() cn.Close() End Sub End Class
Maestros
Claveprofe Nombre Paterno Materno Profesion Fechanac 1 Sergio Gonzalez Perez Ingenieria 18/08/1978 2 Natanael Melendez Melendez Profesional Tecnico en Informatica 10/10/1980 8 Ines Borunda Aguilar