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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] كيف يمكن حساب المسافة بدقة على سطح الارض السيد الغالي 7 180 24-10-18, 09:11 PM
آخر رد: السيد الغالي
  [vb6.0] هل من الممكن الحصول على Label يقبل النص والصوره ؟؟ Microformt 0 65 11-09-18, 06:29 PM
آخر رد: Microformt
  [سؤال] [تم الحل] مشكلة برنامج حساب نسب الموظفين awidan76 29 1,717 08-08-18, 08:51 PM
آخر رد: awidan76
  طريقة البحث في مربع النص dr.mostashar 3 205 15-07-18, 09:13 PM
آخر رد: elgokr
  مطلوب كود اضافة الضريبة 5 % على اجمالي الفاتورة fahad fbs 2 204 13-06-18, 05:56 PM
آخر رد: fahad fbs
  [vb6.0] اتجاه النص فى التقارير aboezzat84 3 233 03-06-18, 10:39 PM
آخر رد: Amir_alzubidy
  [vb6.0] كيفية تحول النص الى دالة رياضية NEW _MAN 4 424 07-04-18, 12:28 PM
آخر رد: Mohamad Anan
  تعديل كشف حساب للعميل w123eg 1 329 29-03-18, 10:19 AM
آخر رد: nourmandour
  تحديد رقم حرف في النص... كيف ؟ Etos 5 357 17-03-18, 02:01 AM
آخر رد: AL_BRNS
  تعديل كشف حساب للعميل w123eg 2 352 25-02-18, 10:28 AM
آخر رد: w123eg

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


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