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:
Código
1. Public Sub negrita() 2. If rtb_hoja.SelectionFont.Bold = False Then 3. rtb_hoja.SelectionFont = New Font(rtb_hoja.SelectionFont, FontStyle.Bold) 4. Else 5. rtb_hoja.SelectionFont = New Font(rtb_hoja.SelectionFont, FontStyle.Bold = False) 6. End If 7. 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?