none
Formulario con RichTextBox RRS feed

  • Pregunta

  • Hola.

    Quisiera saber como hacer que al crear un formulario aparezca con el un RichTextBox. El código del formulario lo tengo, pero el problema es el RichTextBox.

    Gracias de Antemano.

        Private Sub NuevoToolStripButton_Click(sender As Object, e As EventArgs) Handles NuevoToolStripButton.Click
    
            Dim Ventana As New System.Windows.Forms.Form
            Ventana.MdiParent = Me
            VentanaNumber += 1
            Ventana.Text = "Programa " & VentanaNumber
            Ventana.Show()
         End Sub
    
            Private VentanaNumber As Integer


    Pablo González Calderón

    miércoles, 22 de junio de 2016 0:39

Respuestas

  • Hola Pablo Gonzalez Calderon,

    Tendrías que crear una nueva instancia de RichTextBox y agregarla al formulario que estás creando.

    Algo así :

            Dim Ventana As New Form
            Ventana.MdiParent = Me
            VentanaNumber += 1
            Ventana.Text = "Programa " & VentanaNumber
    
            'Creo un nuevo RTB
            Dim rtb As New RichTextBox
    
            'Establezco algunas propiedades
            With rtb
                .Width = 100
                .Height = 100
                .Location = New Point(10, 10)
            End With
    
            Ventana.Controls.Add(rtb) 'Agrego al formulario
    
            Ventana.Show()

    Mediante la instancia rtb puedes acceder a las propiedades del RichTexBox.

    Saludos.


    JC NaupaCrispín
    Lima - Perú

    La magia no existe, la programación SI

    miércoles, 22 de junio de 2016 0:47