05-01-23, 07:22 PM
وعليكم السلام ورحمة الله وبركاته
استخدم الكود التالي(فهو يقوم بـ (Replace) باستبدال الجزء الذي تريد بأي شيء آخر، وهنا حددنا بـ لاشيء(نص فارغ)) :
استخدم الكود التالي(فهو يقوم بـ (Replace) باستبدال الجزء الذي تريد بأي شيء آخر، وهنا حددنا بـ لاشيء(نص فارغ)) :
كود :
Dim strX As String = "https://www.facebook.com/ "
strX = strX.Replace("https://", "").Replace("/", "")
MsgBox(strX)قال صلى الله عليه وسلم:
«كلمتان خفيفتان على اللسان
ثقيلتان في الميزان،حبيبتان إلى الرحمن:
سبحان الله وبحمده، سبحان الله العظيم».