[Meroo1809]

(05-01-23, 07:22 PM)Taha Okla كتب : وعليكم السلام ورحمة الله وبركاته

استخدم الكود التالي(فهو يقوم بـ (Replace) باستبدال الجزء الذي تريد بأي شيء آخر، وهنا حددنا بـ لاشيء(نص فارغ)) :

كود :

Dim strX As String = "https://www.facebook.com/ "
strX = strX.Replace("https://", "").Replace("/", "")

MsgBox(strX)

شكرا لمجهودك يا اخي لكن هذا الكود لم يفعل شئ