[ممدوح]

أهلا بك أخي محمد
وهذا الكود باستخدام Replace الذي أشار إليه أخي محمد

كود :

Private Sub resultButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles resultButton1.Click
        stringLabel1.Text = " "
        Dim a, c, d As String
        c = "welcome to my world"
        stringLabel1.Text = c
        a = characterTextBox1.Text
        d = c.Replace(a, Nothing)
        resultLabel1.Text = d
    End Sub

---

بالنسبة للأخت الكريمة تعمدت أن أضع لها حلولا بناء على ما أراه من الكود لاعتقادي أن المطلوب يعتمد على الأوامر المتعلقة بالوحدة الحالية من المنهج الدراسي،