RE:tecla TAB en flexgrid
Publicado por RAUL (443 intervenciones) el 16/05/2005 13:57:14
con estas lineas capturas la tecla que fue presionada en este caso el enter creo que el valor keyAsccii para el tab es el 65, asi que lo modificas o lo adicionas.
Private Sub MSFlexGrid1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 or KeyAscii = 65 Then
SendKeys "{tab}"
KeyAscii = 0
End If
End Sub
Ahora un msflexgrid ttiene columnas y filas si detectas el tab puedes moverte a la siguiente columna con un simple codigo
MSHFlexGrid1.Col = 2
MSHFlexGrid1.Row = 2
detecctas el tab y vas a la sigueiente celda
MSHFlexGrid1.Col = 3
MSHFlexGrid1.Row = 2 ' misma fila
espero que con esto tengas
suerte
Private Sub MSFlexGrid1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 or KeyAscii = 65 Then
SendKeys "{tab}"
KeyAscii = 0
End If
End Sub
Ahora un msflexgrid ttiene columnas y filas si detectas el tab puedes moverte a la siguiente columna con un simple codigo
MSHFlexGrid1.Col = 2
MSHFlexGrid1.Row = 2
detecctas el tab y vas a la sigueiente celda
MSHFlexGrid1.Col = 3
MSHFlexGrid1.Row = 2 ' misma fila
espero que con esto tengas
suerte
Valora esta pregunta
0