• Miércoles 15 de Mayo de 2024, 09:34

Autor Tema:  Seleccion De Varios Registros Datagrid  (Leído 2958 veces)

roy

  • Miembro activo
  • **
  • Mensajes: 46
    • Ver Perfil
Seleccion De Varios Registros Datagrid
« en: Martes 22 de Marzo de 2005, 22:33 »
0
como puedo seleccionar varias filas de un datagrid, pero que no sea uno por uno, con el mouse y la tecla control, asi puedo seleccionar varios, pero es uno por uno, yo quiero hacerlo seleccionando el primero y el ultimo registro y automaticamente se seleccionen los de enmedio, gracias por su ayuda :comp:

Brroz

  • Miembro de PLATA
  • *****
  • Mensajes: 1058
    • Ver Perfil
Re: Seleccion De Varios Registros Datagrid
« Respuesta #1 en: Jueves 31 de Marzo de 2005, 09:38 »
0
Hola roy.

Código: Text
  1.  
  2. Private Sub DataGrid1_SelChange(Cancel As Integer)
  3.     Dim lIdx As Long, lFrom As Long, lTo As Long
  4.     lIdx = DataGrid1.SelBookmarks.Count
  5.     If lIdx = 2 Then
  6.         lFrom = DataGrid1.SelBookmarks(0)
  7.         lTo = DataGrid1.SelBookmarks(1)
  8.         Dim iStep As Integer
  9.         If lTo < lFrom Then
  10.             lTo = lTo + 1
  11.             lFrom = lFrom - 1
  12.             iStep = -1
  13.         Else
  14.             lTo = lTo - 1
  15.             lFrom = lFrom + 1
  16.             iStep = 1
  17.         End If
  18.         For lIdx = lFrom To lTo Step iStep
  19.             DataGrid1.SelBookmarks.Add lIdx
  20.         Next lIdx
  21.     End If
  22. End Sub
  23.  
  24.  

Chao.

roy

  • Miembro activo
  • **
  • Mensajes: 46
    • Ver Perfil
Re: Seleccion De Varios Registros Datagrid
« Respuesta #2 en: Jueves 31 de Marzo de 2005, 21:06 »
0
gracias amigo Brroz, si funciono como yo queria :D