Visual Basic - Copiar dato

Life is soft - evento anual de software empresarial
   
Vista:

Copiar dato

Publicado por Patricio (47 intervenciones) el 20/05/2010 03:03:56
Estimados
Tengo la siguiente aplicaciòn en el form1 y necesito que el dato del text2 se copie en el form2 en el textbox llamado txt_codigo, quiero que esto ocurra cuando le digo Yes al Msgbox ("desea imprimir etiquetas")
Favor si me pueden decir como lo hago
desde ya gracias

Private Sub Command1_Click()
cod = Val(Text2)
If codigo > 0 Then
With tabla
.AddNew
!codigo = Text2
!Orden = Text7
!Fecha = DTPicker1
!Tipo = Combo1
!Documento = Text6
!Proveedor = Text1
!Nombre = Text3
!Unidad = Text4
!Cantidad = Text5
.Update
MsgBox "Datos Almacenados", vbInformation, "AVISO"
If MsgBox("Desea imprimir etiquetas?", vbYesNo + vbQuestion, "Consulta") = vbYes Then
Unload Form1
Form11.Show
End If

End With
Else
MsgBox "Debe agregar un codigo para iniciar", vbCritical, "CUIDADO"
Text2.SetFocus
End If
End Sub
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:Copiar dato

Publicado por NGENAO (3 intervenciones) el 20/05/2010 03:47:36
MsgBox "Datos Almacenados", vbInformation, "AVISO"
If MsgBox("Desea imprimir etiquetas?", vbYesNo + vbQuestion, "Consulta") = vbYes Then
TEXT2.TEXT = TEXT3.TEXT
Unload Form1
Form11.Show
End If
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

RE:Copiar dato

Publicado por Patricio (47 intervenciones) el 20/05/2010 04:51:52
gracias estimado
era lo que necesitaba.
Saludos
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