Hola.
Estoy haciendo un editor de texto con Visual Basic.
Tengo un problema con la negrita, cursiva y subrayado.
Las 3 funciones son iguales por ejemplo la que pasa el texto a negrita es:
Public Sub negrita()
If rtb_hoja.SelectionFont.Bold = False Then
rtb_hoja.SelectionFont = New Font(rtb_hoja.SelectionFont, FontStyle.Bold)
Else
rtb_hoja.SelectionFont = New Font(rtb_hoja.SelectionFont, FontStyle.Bold = False)
End If
End Sub
Cuando le doy al botón de negrita funciona bien, tanto para poner negrita como para quitarla.
El problema viene cuando tengo una palabra en negrita, y ademas la quiero en cursiva, que no me guarda el primer estado.
Aún no tengo mucha practica con VB y no se me ocurre cómo hacerlo, ¿alguien me echa una mano?
Mostrar Mensajes
