[سؤال] مطلوب كود حساب حروف النص بلا مسافات

[سؤال] مطلوب كود حساب حروف النص بلا مسافات - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [سؤال] مطلوب كود حساب حروف النص بلا مسافات (/showthread.php?tid=1578)

مطلوب كود حساب حروف النص بلا مسافات - مبرمج مبتدئ - 16-01-14

السلام عليكم ورحمة الله
مطلوب كود حساب حروف النص بلا مسافات
فمثلا ( بسم الله الرحمن الرحيم ) 19 حرف
ولكم جزيل الشكر

RE: مطلوب كود حساب حروف النص بلا مسافات - VB_Coder - 16-01-14

السلام عليكم

- أدرج على الفورم Text1 و Label1 و Command1 ثم ضع هذا الكود في داخل كود الزر Command1 :

كود :

Dim zStr As String

zStr = Replace$(Trim$(Text1.Text), " ", "")

Label1.Caption = Len(Trim$(zStr))

- تحياتي .

RE: مطلوب كود حساب حروف النص بلا مسافات - مبرمج مبتدئ - 16-01-14

شكرا جزيلا
بارك الله فيك
وجزيت خيرا كثرا