copia de datos a unText box
Publicado por Javier (1 intervención) el 04/11/2007 19:07:20
Hola amigos tengo un formulario con tres textbox
por otro lado tengo un mshflexgrid con el siguiente código:
If KeyAscii = 13 Then
vbF = MSHFlexGrid1.Row ' Para saber en que fila estoy
vbCol0 = MSHFlexGrid1.TextMatrix(vbF, 0) ' Valor Columna cero
vbCol1 = MSHFlexGrid1.TextMatrix(vbFila, 1) 'Valor Columna uno
vbCol2 = MSHFlexGrid1.TextMatrix(vbFila, 2) 'Valor Columna dos
frmTabla1.Text1.Text = vbCol0
frmTabla1.Text2.Text = vbCol1
frmTabla1.Text3.Text = vbCol2
End If
Esto lo que haria es pasarme los datos de la fila que selecione en el mshflexgrid a los textbox pero me copia bien unicamente el text1, el text2 y el 3 me copia el nombre de las columnas del mshflexgrid (no los datos de la fila seleccionada)
Alguien me puede decir cual es mi error - Muchas gracias de antemano
por otro lado tengo un mshflexgrid con el siguiente código:
If KeyAscii = 13 Then
vbF = MSHFlexGrid1.Row ' Para saber en que fila estoy
vbCol0 = MSHFlexGrid1.TextMatrix(vbF, 0) ' Valor Columna cero
vbCol1 = MSHFlexGrid1.TextMatrix(vbFila, 1) 'Valor Columna uno
vbCol2 = MSHFlexGrid1.TextMatrix(vbFila, 2) 'Valor Columna dos
frmTabla1.Text1.Text = vbCol0
frmTabla1.Text2.Text = vbCol1
frmTabla1.Text3.Text = vbCol2
End If
Esto lo que haria es pasarme los datos de la fila que selecione en el mshflexgrid a los textbox pero me copia bien unicamente el text1, el text2 y el 3 me copia el nombre de las columnas del mshflexgrid (no los datos de la fila seleccionada)
Alguien me puede decir cual es mi error - Muchas gracias de antemano
Valora esta pregunta


0