Visual Basic - NO SE

Life is soft - evento anual de software empresarial
 
Vista:

NO SE

Publicado por el dudoso (34 intervenciones) el 23/05/2010 19:39:07
Necesito cargar una tabla desde un formulario... Ejemplo: un cliente va a comprar pero pide varios producto.. lo q se quiere es cargar en un datagri o algo parecido los producto q el cliente solicito.. y posteriormente guardar los datos..
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:NO SE

Publicado por Jackson Cruz (15 intervenciones) el 24/05/2010 22:47:28
Private Sub BotoGuardar_Click()
If Text3.Text <> "" And Text4.Text <> "" Then
Data1.Recordset.AddNew
Data1.Recordset.Fields("NumerodeFactura") = Val(Text1.Text)
Data1.Recordset.Fields("Producto") = Text3.Text
Data1.Recordset.Fields("Valor") = Val(Text4.Text)
Data1.Recordset.Update
Data1.Refresh
End If
If Text5.Text <> "" And Text6.Text <> "" Then
Data1.Recordset.AddNew
Data1.Recordset.Fields("NumerodeFactura") = Val(Text1.Text)
Data1.Recordset.Fields("Producto") = Text5.Text
Data1.Recordset.Fields("Valor") = Val(Text6.Text)
Data1.Recordset.Update
Data1.Refresh
End If
Resultado = Val(Text4.Text) + Val(Text6.Text) + Val(Text8.Text) + Val(Text10.Text) + Val(Text12.Text)
Text13 = Str(Resultado)
Data2.Recordset.AddNew
Data2.Recordset.Fields("NumerodeFactura") = Val(Text1.Text)
Data2.Recordset.Fields("NombredeCliente") = Text2.Text
Data2.Recordset.Fields("Total") = Val(Text13.Text)
Data2.Recordset.Update
Data2.Refresh
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar