تحلیل اعداد

[Juventus FC]

سلام

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

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


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

[Juventus FC]

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

[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)

[Juventus FC]

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

[Juventus FC]

بیا کسی هست
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]

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

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

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

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

[Juventus FC]

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

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

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

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

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

[www.pc3enter.tk]

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

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