4 رد (ردود) على هذا الموضوع

[بستان المعرفة]

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

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

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

هذا هو النص
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 April 2010 - 11:44 AM.

[mido128]

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

تم التعديل بواسطة mido128, 26 April 2010 - 03:41 PM.

[King Oracle]

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


بارك الله بك

[بستان المعرفة]

mido
الجبالي

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

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


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

[بستان المعرفة]

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

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


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

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

داخل Button


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