Visual Basic - Se pueden desplegar varias lineas de texto en una celda de msflexgrid?

Life is soft - evento anual de software empresarial
   
Vista:

Se pueden desplegar varias lineas de texto en una celda de msflexgrid?

Publicado por Laura (1 intervención) el 16/06/2012 00:55:12
Hola a todos, tengo la siguiente duda, se puede desplegar en un msflexgrid varias lineas de texto en una celda?

Por su ayuda muchas gracias.

Saludos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

Se pueden desplegar varias lineas de texto en una celda de msflexgrid?

Publicado por Charles (261 intervenciones) el 18/06/2012 02:38:47
Hola Laurita.
Bueno mira crea un nuevo proyecto, en tu MsFlexGrid agregale una fila y dos columnas,
asegurándote que que el MsFlexGrid tenga la altura necesaria para mostrar todas
las lineas de texto que quieras meter en una fila (indicado en la constante
N), pega el siguiente código, y córrelo con diferentes valores para N:

Const N = 3

Private Function GenerarLineas(N As Integer) As String
Dim s As String, i As Integer
For i = 0 To N - 1
If (i) Then s = s & vbCrLf
s = s & "Esta es la linea " & i + 1
Next
GenerarLineas = s
End Function

Private Sub Form_Load()
With MSFlexGrid1
.WordWrap = True
.ColWidth(1) = .Width - 300 - .ColWidth(0)
.RowHeight(1) = Me.TextHeight("Z") * (N + 0.5)
.TextMatrix(1, 1) = GenerarLineas(N)
End With
End Sub

El cálculo de RowHeight está basado en un "número mágico" (un número que
producen el resultado deseado, aunque no se sabe por qué: normalmente se
obtienen mediante ensayo y error): en este caso el alto del texto, por la
cantidad de líneas más la mitad del alto del texto.

La propiedad WordWrap le dice al grid cómo interpretar los saltos de línea
(si lo pones a False, los vbCrLf aparecen como dos garabatos, y no parten la
línea).

Espero te sirva, un abrazo.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Se pueden desplegar varias lineas de texto en una celda de msflexgrid?

Publicado por Laura (14 intervenciones) el 19/06/2012 05:57:23
Muchas gracias por tu aportación...tengo una duda la constante N donde la declaro?..en el Option explicit?...gracias de nuevo...Charly
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar