CLR: .Net / Mono / Boo / Otros CLR > VB .NET

 Imprimir contenido TextBox en dos lineas

(1/1)

mexican2:
Hola, Saludo
Tengo este codigo que me funciona un 99%

--- Código: vb.net ---Dim cadena As String = txtNombre.TextDim parte1 As StringDim parte2 As String        If cadena.Length > 75 Then            parte1 = cadena.Substring(0, 75)            parte2 = cadena.Substring(75)                'pone cada parte para imprimir            e.Graphics.DrawString(parte1, prFont, Brushes.Black, 28, 127)            e.Graphics.DrawString(parte2, prFont, Brushes.Black, 28, 142)        Else                 'aqui pone la linea completa si es menor de 75 caracteres para imprimir            e.Graphics.DrawString(txtNombre.Text, prFont, Brushes.Black, 28, 127)        End If Solo hay un problema, en el caracter 75 me parte la palabra bruscamente
lo correcto seria que la dividiera cuando encuentre un espacio entre palabras, proximo a los 75 caracteres

DiabloRojo:
Qué tal mexican2.

Creo que tu mismo contestaste tu pregunta. Substring funciona exactamente así (corta bruscamente). Te toca a ti evaluar si el caracter 75 es un espacio en blanco o no y en función de eso devolver hasta el espacio anterior.

mexican2:
Gracias por responder DiabloRojo
El problema es que soy novato, tengo pocos conocimientos de vb.net
Cual seria el codigo para evaluar lo que tu dices

Haggen:
pues podría ser por ejemplo

If parte2.IsNullOrEmpty(parte2.Trim) = True Then
  'hacer algo si es vacio o nulo
Else
 'hacer algo si no vacio o nulo
End If

Navegación

[0] Índice de Mensajes