تقييم الموضوع :
  • 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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [vb6.0] كيفية تحول النص الى دالة رياضية NEW _MAN 4 234 07-04-18, 12:28 PM
آخر رد: Mohamad Anan
  تعديل كشف حساب للعميل w123eg 1 69 29-03-18, 10:19 AM
آخر رد: nourmandour
  تحديد رقم حرف في النص... كيف ؟ Etos 5 215 17-03-18, 02:01 AM
آخر رد: AL_BRNS
  تعديل كشف حساب للعميل w123eg 2 72 25-02-18, 10:28 AM
آخر رد: w123eg
  اريد حساب checksum شيك سوم لسطر معين wolf1120 1 37 19-02-18, 11:23 PM
آخر رد: wolf1120
  حساب عمود ب هيكس ديسمال wolf1120 0 40 09-01-18, 07:52 PM
آخر رد: wolf1120
  مطلوب طريقة الفرز على حسب عمودين في جدول واحد w123eg 2 101 26-12-17, 09:33 PM
آخر رد: w123eg
  مطلوب كود select all للأداة chekbox Abo Mnsour 6 260 19-07-17, 08:56 AM
آخر رد: Abo Mnsour
  برنامج حساب ساعات إضافية فيصل علي 2 324 30-03-17, 02:17 AM
آخر رد: فيصل علي
  سؤال - توزيع حروف الكلمة في التكستات بالترتيب الأبجدي abusofy 8 628 09-12-16, 11:03 AM
آخر رد: abusofy

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


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