السلام عليكم ورحمة الله وبركاته

أهلا بكم أعزائي

أود بمساعدة منكم إن أمكن .. وذلك لإتمام الأسايمنت بلغه فيجول بيسك

طُلب :
أن يتم تصميم برنانج .، يحتوي على اسم المستخدم والرقم السري .. وما في ذلك أن يمنح للمستخدم إن كان غلط إداخل الرقم السري واسم المستخدم ثلاث مرات متتاليه بعد ذلك إغلاق البرنامج

هذا هو النص
You have been asked to prepare a login form in which 2 types of users can login with different accessibility of the application. Both types of users will have three attempts to login. If the entered username and password is invalid after 3rd attempt, the application will automatically close.

اتمنى مساعدتي فالكود لي ممكن أستخدمه في هذه الخطوة .. بأقرب وقت ممكن
لكم مني جزيل الشكر ..

تم تعديل 26 أبريل 201015 سنة بواسطة بستان المعرفة

dim v_flag as intger
=================
if v_flag = 3 then
v_flag = 0
unload me
end
end if
=================
if text_username = "username" and text_passwoed = "password" then
form.show
v_flag = 0
else
v_flag = v_flag + 1
msgbox " You have entered wrong username or password",critical,"wrong attidude"
textusername = ""
textpassword = ""
textusername.setfocuse
end if

تم تعديل 26 أبريل 201015 سنة بواسطة mido128

اعتقد ان الاخ ميديو اجاب عن السؤال


بارك الله بك

mido
الجبالي

لكما جزيل الشكر على حسن التوضيح وحسن تعاونكم معي

ولكن ما هو مطلوب منا بأن نستخدم For Loop


بارك الله فيكم

لكم مني خالص الشكر على عطركم الفواح
لقد عملت على حل مشكلة الباسورد

ولآن توقفة في الخطوة التاليه


ألا وهي
اني اريد مجموع Total Price لي بلون الأحمر يظهر في خانة Total لي بلون الأزرق
عملت الخطوة التاليه بس ما يظهر معي الناتج صح ..؟؟ هل من كود يوصلني لناتج الصحيح ..؟؟

Txt_total.Text = (CDbl(TxtTotalPrice.Text) + CDbl(TxtTotalPrice.Text))

داخل Button


بارك الله فيكم