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

اريد كود عند الضغط على الزر يختار احد الارقام الي انا احددها مثلا 9999
ولما اضغط مره اخرى على الزر يخرج رقم اخر مثلا 6666
وهكذا

المهم الارقام انا احددها

[COLOR="#0000FF"]السلام عليكم ورحمة الله وبركاته
تفضل الكود :

PHP كود :

Dim TName(4) As String
Dim s As Integer

TName(0) = "9999"
TName(1) = "6666"
TName(2) = "5555"
TName(3) = "4444"
TName(4) = "3333"
Randomize

s = Int(Rnd * 5)
Text1.Text = TName(s) 

في المثال السابق وضعت لك خمسة أرقام إذا وضعت أنت أكثر مثلاً سبعة أرقام
عدل ما يلي :

PHP كود :

Dim TName(7) As String 

PHP كود :

s = Int(Rnd * 8) 

بالتوفيق أخي الكريم[/COLOR]

ما شاء الله عليك اخي السندباد

نعم هذا ما كنت ابحث عنه
بارك الله فيك

اخي السندباد واذا اردة هذا الارقام تكون متسلسله من الواحد مثلا وحتى العشرين بشرط تتولد بشكل يومي وكل يوم يبداء الرقم من الواحد بحيث لا تتكرر باليوم الواحد

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

nablion

السندبااد

nablion

الحزين اليماني