تحلیل اعداد

سلام

من شاید 4 5 سال هست از دنیای برنامه نویس دور هستم و واقعا چیزی به اونصورت به یاد ندارم ولی یادم هست که قبلا همچین تحلیل هایی رو داشتم ، میخوام برنامه بنویسم که مثلا یک "e6cc8e7a22ecd22d72488f863a484247" چنین چیزی بهش بدم بعد سیستم تحلیل کنه برام چند تا عدد ، چند تا حرف ، چند تا از یک عدد پشت سر هم و چند تا حرف پشت سر هم در این رشته وجود داره.

بعد میخواهم کد اسکی همه رو با هم در بیاریم تقسیم بر تعداد بکنم !


عین همین برنامه رو من یاد دارم که دوران دانشجویی نوشته بودم با VB6 ولی الآن نه یادم هست نه سورسش و دارم که بخونم یادم بیاد ، کسی میتونه کمکم کنه؟ چه طور بنویسم با چی بنویسم؟

کمکی نیست واقعا! ؟

بیا کسی هست

Dim Adad

Dim Horof

Dim Aski as integer



Matn="e6cc8e7a22ecd22d72488f863a484247"



For a=1 to len(Matn)

   ZZ=mid(Matn,a,1)



   If IsNumeric(zz)=True then

    Adad=adad+1

   Else

    Horof=horof+1

   End if



   Aski=Aski+asc(ZZ)

Next a



Print "adad=" & Adad

Print "horof=" & Horof

Print "Ascii=" & Aski / Len(Matn)

ممنونم دوست عزیز فقط ، اگر من بخواهم بگم اگر تعداد اختلاف بین اعداد و حروف از یک مقدار مشخص مثلا از 5 بیشتر بود و همچنین اگر "

e6cc8e7a22ecd22d72488f863a484247" با حروف شروع شده بود بده "اوکی" باید چی بنویسم ؟

نقل قول:

---

نوشته شده توسط www.pc3enter.tk

بیا کسی هست

Dim Adad

Dim Horof

Dim Aski as integer



Matn="e6cc8e7a22ecd22d72488f863a484247"



For a=1 to len(Matn)

ZZ=mid(Matn,a,1)



If IsNumeric(zz)=True then

Adad=adad+1

Else

Horof=horof+1

End if



Aski=Aski+asc(ZZ)

Next a



Print "adad=" & Adad

Print "horof=" & Horof

Print "Ascii=" & Aski / Len(Matn)

---

ممنونم دوست عزیز فقط ، اگر من بخواهم بگم اگر تعداد اختلاف بین اعداد و حروف از یک مقدار مشخص مثلا از 5 بیشتر بود و همچنین اگر "

e6cc8e7a22ecd22d72488f863a484247" با حروف شروع شده بود بده پیغام بده "اوکی" باید چی بنویسم ؟

ببین خوب نوشتی ها ولی متوجه درست منظورت نشدم
که باید به شکلی برات کدو بنویسم

یکمی بازش کن برام، انگار انشاء ات ضعیفه
۲ تا اگر تو یک جمله: (اگر من بخواهم بگم اگر تعداد)

یعنی چه_: تعداد اختلاف بین اعداد و حروف
(تو چیش، تو اندازه، تو فاصله، تو تکرار، تو چی)؟
و غیره ‌.....

درست سوالتو واضح مطرح کن، حتی طولانی تا دیگران جوابتو بدند.

نقل قول:

---

نوشته شده توسط www.pc3enter.tk

ببین خوب نوشتی ها ولی متوجه درست منظورت نشدم
که باید به شکلی برات کدو بنویسم

یکمی بازش کن برام، انگار انشاء ات ضعیفه
۲ تا اگر تو یک جمله: (اگر من بخواهم بگم اگر تعداد)

یعنی چه_: تعداد اختلاف بین اعداد و حروف
(تو چیش، تو اندازه، تو فاصله، تو تکرار، تو چی)؟
و غیره ‌.....

درست سوالتو واضح مطرح کن، حتی طولانی تا دیگران جوابتو بدند.

---

ممنونم خودم حلش کردم ! حالا یک موردی ، من برنامه کامل کردم و دیتاهای ورودیم رو هم تو یک بانک اطلاعاتی ذخیره کردم ، در بانک اطلاعاتی من یک Table وجود داره که اون Table دو تا ستون داره ، ستون اول کدی که کاربر در تکست 1 وارد میکنه را ذخیره میکنه ستون دوم حاصل جمع و تفریق کدی که کاربر داده را ذخیره میکنه ، حالا میخواهم شرط بگذارم که اگر کدی که کاربر وارد میکنه قبلا در دیتابیس وجود داشته بیاد و حاصل جمع و تفریق مربوط به همان کد را در تکست 3 نمایش بده.

سوالت نامفهومه‌، که دقیقا چی میخواهی؟
درست توضیح بده یا نومنه عکسی بزار

(

حالا میخواهم شرط بگذارم که اگر کدی که کاربر وارد میکنه قبلا در دیتابیس وجود داشته بیاد و حاصل جمع و تفریق مربوط به همان کد را در تکست 3 نمایش بده.)