Visual Basic Foro

Programación => Visual Basic 6 => Mensaje iniciado por: pepino en Septiembre 12, 2014, 09:11:13 pm

Título: Pasar datos de un control a otro Arrastrando mouse
Publicado por: pepino en Septiembre 12, 2014, 09:11:13 pm

(https://imagizer.imageshack.us/v2/486x334q90/910/BPpLLU.jpg)

quisiera intercambiar los tiempos de las cabinas en caso de que estuvieran activadas con solo arrastrar el mouse de una cabina a otra. espero y me ayuden
o si alguien tiene un simple ejemplo de como pasar datos de un textbox a otro tan solo arrastrando me serviria, muchas gracias.

Título: Re:Pasar datos de un control a otro Arrastrando mouse
Publicado por: Albertomi en Septiembre 12, 2014, 09:52:51 pm

Estimado pepino

Tienes que hacer uso de lo que se conoce como Drag and Drop, para casos de ejemplo adiciona en formulario 2 TextBox y a la propiedad DragMode asígnales el valor de 1 - Automatic

Adiciona el siguiente código

Código: [Seleccionar]

Private Sub Text1_DragDrop(Source As Control, X As Single, Y As Single)
  Text1.Text = vbNullString
  Text1.Text = Source.Text
End Sub
 
Private Sub Text2_DragDrop(Source As Control, X As Single, Y As Single)
  Text2.Text = vbNullString
  Text2.Text = Source.Text
End Sub

Este es solo un ejemplo ya que el código se puede mejorar más.
 
Saludos, desde algún lugar de lima-Perú

Título: Re:Pasar datos de un control a otro Arrastrando mouse
Publicado por: pepino en Septiembre 13, 2014, 11:29:14 pm

Cita de: Albertomi en Septiembre 12, 2014, 09:52:51 pm

Estimado pepino

Tienes que hacer uso de lo que se conoce como Drag and Drop, para casos de ejemplo adiciona en formulario 2 TextBox y a la propiedad DragMode asígnales el valor de 1 - Automatic

Adiciona el siguiente código

Código: [Seleccionar]

Private Sub Text1_DragDrop(Source As Control, X As Single, Y As Single)
  Text1.Text = vbNullString
  Text1.Text = Source.Text
End Sub
 
Private Sub Text2_DragDrop(Source As Control, X As Single, Y As Single)
  Text2.Text = vbNullString
  Text2.Text = Source.Text
End Sub

Este es solo un ejemplo ya que el código se puede mejorar más.
 
Saludos, desde algún lugar de lima-Perú

Exalente albertomi muchas gracias.