منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .

لدي هادا الكود بلغة بايثون
import itertools
.res = itertools.product('abc', repeat=3) # 3 is the length of your result
:for i in res
(print ''.join(i

النتيجه :

aaa
aab
aac
aba
abb
abc
aca
acb
acc
baa
bab
bac
bba
bbb
bbc
bca
bcb
bcc
caa
cab
cac
cba
cbb
cbc
cca
ccb
ccc

(يقوم بحساب احتمالات النص الدي تدخله بعد تحديد طول النص المطلوب)
اريد كود vb.net يؤدي نفس الوظيفه

جرب بنص بسيط واستخدم راندوم للاندكس لكي تدخل له حرف عن طريق insert

يا علي،

جرب أبسط طريقة ب For Next

PHP كود :

For i1 = Asc("a") To Asc("c")
    For i2 = Asc("a") To Asc("c")
        For i3 = Asc("a") To Asc("c")
            ListBox1.Items.Add(Chr(i1) & Chr(i2) & Chr(i3))
        Next
    Next
Next 

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

ali ahmed 1997

سعود

الوادي