Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

Trasladar una Fila Datagrid

Estas en el tema de Trasladar una Fila Datagrid en el foro de Visual Basic clásico en Foros del Web. Buenas Foreros ojala me puedan ayudar mi problema es q toy reciendo empezando en visual: Tengo 2 datagrid con los mismos campos, como hago para ...
  #1 (permalink)  
Antiguo 14/05/2005, 16:13
 
Fecha de Ingreso: abril-2005
Mensajes: 501
Antigüedad: 19 años
Puntos: 1
Trasladar una Fila Datagrid

Buenas Foreros ojala me puedan ayudar mi problema es q toy reciendo empezando en visual: Tengo 2 datagrid con los mismos campos, como hago para mandar toda una fila de un datagrid a la otra y una vez realizado este traslado se borre automaticamnete del datagrid origen,muchas gracias x la respuesta.
  #2 (permalink)  
Antiguo 16/05/2005, 09:57
Avatar de GeoAvila
Colaborador
 
Fecha de Ingreso: diciembre-2003
Ubicación: Antigua Guatemala
Mensajes: 4.032
Antigüedad: 20 años, 4 meses
Puntos: 53
seria mejor si lo haces con un msflexgrid..

nos vemos..
__________________
* Antes de preguntar lee las FAQ, y por favor no hagas preguntas en las FAQ
Sitio http://www.geoavila.com twitter: @GeoAvila
  #3 (permalink)  
Antiguo 16/05/2005, 11:37
Avatar de vbx3m  
Fecha de Ingreso: febrero-2005
Ubicación: Venezuela
Mensajes: 524
Antigüedad: 19 años, 3 meses
Puntos: 1
Para trasladar

Dim a As String
MSFlexGrid1.Row = 1
MSFlexGrid2.Row = 1
For i = 0 To MSFlexGrid1.Cols - 1
MSFlexGrid1.Col = i
a = MSFlexGrid1.Text
MSFlexGrid2.Col = i
MSFlexGrid2.Text = a
Next

Para borrar

For i = 0 To MSFlexGrid1.Cols - 1
MSFlexGrid1.Col = i
MSFlexGrid1.Text = ""
Next
__________________
ホルヘ・ラファエル・マルティネス・レオン
  #4 (permalink)  
Antiguo 16/05/2005, 14:50
 
Fecha de Ingreso: abril-2005
Mensajes: 137
Antigüedad: 19 años
Puntos: 0
Cita:
Iniciado por vbx3m
Para trasladar

Dim a As String
MSFlexGrid1.Row = 1
MSFlexGrid2.Row = 1
For i = 0 To MSFlexGrid1.Cols - 1
MSFlexGrid1.Col = i
a = MSFlexGrid1.Text
MSFlexGrid2.Col = i
MSFlexGrid2.Text = a
Next

Para borrar

For i = 0 To MSFlexGrid1.Cols - 1
MSFlexGrid1.Col = i
MSFlexGrid1.Text = ""
Next
que buen ejemplo simple y rapido
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 03:32.