Código
Syntax error (missing operator) in query expression '' Productos Lacteos' WhereIdProducto=Val(1)'.
Intente ponerle cochetes pero todavia sale el error creo que el error es categoria pero no se como
Código
PrivateSubBtnGuardar_Click(sender AsSystem.Object, e AsSystem.EventArgs) HandlesBtnGuardar.Click IfTxtIdProducto.Text = ""Then 'Agrego un registro nuevo Almacenar("Insertinto Productos (Nombre, Cantidad, Precio, IdProveedor, Categoria) values ('" + TxtNombre.Text + "','" + MtbCantidad.Text + "', '" + MtbPrecio.Text + "', '" + MtbIdProveedor.Text + "','" + TxtCategoría.Text + "')") Else 'Modifico un registro existente Almacenar("Update Productos set Nombre='" + TxtNombre.Text + "', Cantidad='" + MtbCantidad.Text + "', Precio='" + MtbPrecio.Text + "', IdProveedor='" + MtbIdProveedor.Text + "',Categoria='" + TxtCategoría.Text + "' whereIdProducto=val(" + TxtIdProducto.Text + ")") EndIf RefrescarDatos()