ارجوو المساعدة

ضعي هذا الكود في حدث form_load

dim Pass as string

pass= inputbox("ادخل كلمة المرور من فضلك")

if pass<>"group1" then 
  msgbox " كلمة المرور غير صحيحه"
   unload me
  exit sub
end if

تحياتي

مشكوووور اخوي الله يعطيك العافيه

لو سمحت اخوي مو راضي يشتغل كلمة unload me تحتها خط ازرق ليش ؟؟

آسفة اذا ازعجتك

انت على اي اصدارة شغال ؟؟؟

هل على فيجوال بيسك 6 او على الدوت نت ؟؟؟

الكود السابق اعد ليعمل على فيجوال بيسك 6 وليس على دوت نت

Microsoft Visual Studio 2005 هذا الاصدار اخوي

هذا ليعمل على دوت نت

dim Pass as string

pass= inputbox("ادخل كلمة المرور من فضلك")

if pass<>"group1" then 
  msgbox " كلمة المرور غير صحيحه"
   me.close()
  exit sub
end if

تحياتي

مشكور اخوي الله يجزاك الخير اشتغل البرنامج

اختي بما انك تعملين على الدوت نت فتوجهي الى قسم الدوت نت ... هذا القسم مخصص لفيجوال بيسك 6 وبالتالي لن يفيدك كثيرا .

هناك ستجدين الكثير من الامثلة والبرامج .

تحياتي