Copiar datos a textbox
Publicado por Javier (1 intervención) el 04/11/2007 19:13:31
Hola a todos 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 copiarme los datos de la fila seleccionada a los textbox pero me copia bien unicamente el text1, el text 2 y 3 me copia los nombres de columnas (no los datos de la fila seleccionada) alguien me puede decir cual es mi error - Muchas gracias de antemano
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 copiarme los datos de la fila seleccionada a los textbox pero me copia bien unicamente el text1, el text 2 y 3 me copia los nombres de columnas (no los datos de la fila seleccionada) alguien me puede decir cual es mi error - Muchas gracias de antemano
Valora esta pregunta


0