Cambiar formato a un Richtextbox

[Nietoma]

Hola a todos.

He creado un Richtextbox en tiempo de ejecución y no soy capaz de cambiarle el formato de letra con el FontDialog , sin embargo creándolo en tiempo de diseño si me lo permite.
Si alguien puede ayudarme se lo agradecería mucho.

Un saludo.

[MCKSys Argentina]

Podrias poner el codigo que etsas usando? Asi podriamos ayudarte mejor...

[Nietoma]

Hola.

Utilizo este:

Código (vbnet) [Seleccionar] Expandir

FontDialog1.Font = Richtextbox1.Font
                FontDialog1.ShowDialog()
                Rchtextbox1.Font = FontDialog1.Font

La cuestión es si lo coloco seguido de este que lo crea dinamicamente:

Código (vbnet) [Seleccionar] Expandir

Richtextbox1.Size = New Size(300, 300)
Richtextbox1.Location = New Point(50, 50)
Controls.Add(Texto)

si me cambia el formato, pero solo antes de aparecer el richtextbox y nada mas, sin embargo si lo asocio a un botón o a cualquier otro control no hay manera.

[MCKSys Argentina]

En un form con un RichTextBox (RichTextBox1) oculto, un Common Dialog (CMD) y un Command button (Command1):

Código [Seleccionar] Expandir


Dim rtf1 As RichTextBox

Private Sub Command1_Click()
'crea un RTF en la pos 60,60
Set rtf1 = Controls.Add("RichText.RichTextCtrl.1", "txt")
rtf1.Left = 60
rtf1.Top = 60
rtf1.Visible = True

'Carga un Common Dialog con los valores de la FONT del RTF
CMD.Flags = cdlCFBoth
CMD.FontBold = rtf1.Font.Bold
CMD.FontItalic = rtf1.Font.Italic
CMD.FontName = rtf1.Font.Name
CMD.FontSize = rtf1.Font.Size
CMD.FontStrikethru = rtf1.Font.Strikethrough
CMD.FontUnderline = rtf1.Font.Underline
CMD.ShowFont
'Pone la FONT del RTF a los valores que devuelve el CMD
rtf1.Font.Bold = CMD.FontBold
rtf1.Font.Italic = CMD.FontItalic
rtf1.Font.Name = CMD.FontName
rtf1.Font.Size = CMD.FontSize
rtf1.Font.Strikethrough = CMD.FontStrikethru
rtf1.Font.Underline = CMD.FontUnderline
End Sub



Eso me funciona bastante bien...

[raul338]

El código de Nietoma encaja perfecto con la sintaxis de vb.net, es así? Porque de ser así esta en el foro incorrecto y lo tengo que mover. ademas que es probable de que el código que te ayudemos no funcione correctamente

[$Edu$]

Es .net si raul, movelo que hara que otros pierdan el tiempo, como hizo MCKSys xD

[Nietoma]

Siento mucho haberme confundido, pero es que soy nuevo en esto y no se cual es la diferencia entre Visual Basic y VB.net, en visual basic lo poco que utilicé fue Visual Basic 6.0,pero ya no sé por donde van y lo único que sé es que cuando me bajé este visual basic era "Visual Basic 2008" no decia nada de .Net.
Siento haberle echo perder el tiempo a MCKSys, desde luego no era mi intención y le doy las gracias por la ayuda que me ha prestado que seguro que me será útil aunque sea Visual Basic.
Un saludo.