URGENTE AYUDA CON EL MSFLEXGRID

MANUEL
06 de Abril del 2006
Deseo agregar automaticamente una fila al dar enter en un texto me agregue una fila y meta el dato lo del dato no es muy importante lo que deseo es saber como agrego automaticamente esa fia, les agradecere mucho su ayda estoy en aprietos gracias

Rosa
06 de Abril del 2006
Hola, este código te agrega una fila al final y pone el dato ingresado en text1 en la primera columna de la fila creada.

Private Sub Text1_KeyPress(KeyAscii As Integer)

If KeyAscii = vbKeyReturn Then
MSFlexGrid1.Rows = MSFlexGrid1.Rows + 1
MSFlexGrid1.TextMatrix(MSFlexGrid1.Rows - 1, 0) = Text1.Text

End If

End Sub