Demo entry 6749645

form1

   

Submitted by anonymous on Jun 13, 2018 at 18:12
Language: VB.net. Code size: 414 Bytes.

Public Class Form3  
  
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click  
  
        Dim f2 As New Form2  
        f2 = Form1.ActiveMdiChild  
        Dim retext As String  
  
        retext = Replace(f2.RichTextBox1.Text, Me.TextBox1.Text, Me.TextBox2.Text)  
        f2.RichTextBox1.Text = retext  
  
  
    End Sub  
  
End Class  

This snippet took 0.00 seconds to highlight.

Back to the Entry List or Home.

Delete this entry (admin only).