تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] مطلوب كود حساب حروف النص بلا مسافات
#1
السلام عليكم ورحمة الله
مطلوب كود حساب حروف النص بلا مسافات
فمثلا ( بسم الله الرحمن الرحيم ) 19 حرف
ولكم جزيل الشكر
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم

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

كود :
Dim zStr As String

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

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

- تحياتي .
كود :
For each Breathe in MyLife
Breathe.Say " سبحان الله والحمد لله ولا إله إلا الله والله أكبر أستغر الله العظيم وأتوب إليه"
Next
الرد }}}}
تم الشكر بواسطة: ناجي إبراهيم
#3
شكرا جزيلا
بارك الله فيك
وجزيت خيرا كثرا
الرد }}}}
تم الشكر بواسطة: VB_Coder


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال - توزيع حروف الكلمة في التكستات بالترتيب الأبجدي abusofy 8 195 09-12-16, 11:03 AM
آخر رد: abusofy
Lightbulb سؤال - توزيع حروف الكلمة في تكستات abusofy 3 160 07-12-16, 10:25 PM
آخر رد: abusofy
  أضافة كلمة لأخر النص Jonewickk 1 86 27-10-16, 11:24 PM
آخر رد: Ahmed_Mansoor
  اريد تعديل هذا الكود للبحث لاى كلمه فى النص رجل الكهرباء 2 169 03-10-16, 02:19 AM
آخر رد: رجل الكهرباء
  [ تمّ الحل ] : حساب الفرق بين تاريخين عبد العزيز البسكري 6 276 24-09-16, 12:31 AM
آخر رد: Amir_alzubidy
  احتاج الى الكود لتحويل الارقام الى حروف hicham716 10 500 07-07-16, 09:29 PM
آخر رد: hicham716
  [سؤال] حساب مواقيت الصلاة بالفيجوال بيسك 6 بوعيسى 7 442 29-06-16, 02:00 AM
آخر رد: بوعيسى
  [سؤال] تحويل النص من ping الى text (التعرف على النصوص) hsansalhh 4 225 26-06-16, 01:52 PM
آخر رد: hsansalhh
  حساب مجاميع الحركات المالية هل يمكن مع فيجوال بيسك ؟ princeofislam 13 776 10-04-16, 10:01 AM
آخر رد: Ahmed_Mansoor
  [سؤال] مطلوب كود تفقيط الأرقام بالانجليزي aboezzat84 2 232 07-04-16, 02:56 PM
آخر رد: aboezzat84

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم