Hola a todos
Estoy usando VB 2010 con una base de datos access
dentro de un formulario con este código muestro un cuadro de diálogo
Dim dialogModal As New dialogControlEditar
dialogControlEditar.ShowDialog()
Dentro del cuadro de dialogo tengo unas cajas de texto y con un botón cargo unos datos a la base de datos.
Dim dbObra As New OleDbConnection( _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Password=;User ID=Admin;" & _
"Data Source=" & lblObraCompleto.Text)
Dim SQL = "INSERT INTO DetEgresos (ID, Cantidad, Descripcion, Precio, Total)" & _
"VALUES(@ID, @Cantidad, @Descripcion, @Precio, @Total)"
Dim Cmd As New OleDbCommand(SQL, dbObra)
Cmd.Parameters.AddWithValue("ID", lblID.Text)
Cmd.Parameters.AddWithValue("Cantidad", txtCantidad.Text)
Cmd.Parameters.AddWithValue("Descripcion", txtDescripcion.Text)
Cmd.Parameters.AddWithValue("Precio", txtUnitario.Text)
Cmd.Parameters.AddWithValue("Total", lbltotalsimple.Text)
dbObra.Open()
Cmd.ExecuteNonQuery()
dbObra.Close()
Hasta ahi todo bien, pero el tema es que me cierra el cuadro de diálogo al ejecutar este codigo y ejecutando paso a paso me lleva de nuevo a la línea dialogControlEditar.ShowDialog()
del formulario. Siendo que este cuadro de diálogo no tiene asignado un AcceptButton
Alquien me puede dar una idea que está pasando?
Gracias
Carlos
