SoloCodigo

Hola a todos tengo un problemita  tengo un formulario que me permite escoger ciertas opciones luego al presionar un boton los datos de los combos deberan visualizace en  un MSHFlexGrid colocando un numero de item a cada opcion que yo eliga el problema es que me sale todo en una misma linea no avanza  esto es lo que puse en el programa "AYUDENME " por fa

Private Sub Command2_Click()

i = 1
 
MSHFlexGrid1.TextMatrix(0, 0) = "ITEM"
 MSHFlexGrid1.ColWidth(0) = 1000
 MSHFlexGrid1.TextMatrix(0, 1) = "CODIGO DE CONTROL DE CALIDAD"
 MSHFlexGrid1.ColWidth(1) = 4000

 MSHFlexGrid1.Col = 1
 MSHFlexGrid1.Row = i
 MSHFlexGrid1.Text = i

 MSHFlexGrid1.Col = 1
 MSHFlexGrid1.Row = i
 MSHFlexGrid1.Text = DataCombo3.Text

 i = i + 1
 
 MSHFlexGrid1.Rows = MSHFlexGrid1.Rows + 1
 
End Sub

Hola desarrollo.
Todo te sale en la misma línea debido a que cada vez que entras al evento click de tu commandbutton inicializas i=1. De momento lo único que se me ocurre es que declares i como Static ya sea a nivel de formulario o en un módulo .BAS (de acuerdo a lo que necesites) y que la primera línea dentro de tu evento click sea i=i+1.


DiabloRojo.

Muchas gracias ahora    si avanza pero me deja una linea en blanco entre la cabecera y el primer registro ademas ya no me visualiza el item  

Desarrollo  

Mil gracias voy a intentarlo

Desarrollo