[3booody]

[COLOR="#800000"]السلام عليكم ورحمة الله وبركاته
بحسب استخدامي لفيجول بيسك دوت نت استخدم هذه الطريقه[/COLOR]

كود :

For Each num As String In Me.TextBox1.Text.Split(" ")
            num = Replace(num, "23", "8")
            num = Replace(num, "235", "0")
            Me.ListBox1.Items.Add(num)
        Next

حاول تغير الكود على فيجول 6 لان بصراحة نسيت الكثير عن فيجول 6