option butoon

[looodi]

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

 

 

اخواني كيف اجعل للمستخدم ان يختار اوبشن بوتن وحده؟ عندما صصمت النموذج متاح لي الاختيارين انا اريد ان اجعله يختار اما الاجابه الاولى ام الثاني

الخيارات هي موافق او غير موافق \

اذا اختار المستخدم موافق يرسل ايميل له بان تم القبول

اذا اختار المستخدم غير موافق يرسل ايميل  كذالك

[jjafferr]

وعليكم السلام

 

 Option Group عبارة عن عمل لمجموعة ومجرد برواز خارجي ، والمجموعة لا يكون لها اسم داخل Option Group ، وانما لها رقم ، والرقم هذا يُعطى لحقل Option Group ،

مثلا اعملي Option Group بإسم opt_Test ، وبدون اي شيء داخلها ، يعني اول ما تعمليه في النموذج ، ثم يسألك الاكسس عن اشياء اخرى ، اضغطي على الزر Esc من الكيبورد ،

ثم من تصميم النموذج اختيار مثلا: Toggle Button او Check Box او Option Button واعمليه داخل Option Group ، حيث سترين ان لونه صار اسود ، مما يعني انك تستطيعين عمله هناك ،

الآن اصبح عندك Option Group والذي هو برواز ، وداخله كائن Option Button وفي آخر اعداداته هناك اختيار Option value وهنا تستطيعين اعطاء رقم مميز لكل كائن ،

وهنا تستطيعين ان تعملي Copy/Paste لهذا الكائن واعطاء كل منهم اسمه ورقمه المميز ، والى هنا وينتهي دور هذه الكائنات ،

 

الآن اعملي حدث على نقر opt_Test ، واكتبي فيه:

Select case me.opt_Test
  case 1
	msgbox "تم النقر على الزر رقم 1"
  case 2
	msgbox "تم النقر على الزر رقم 2"
End select

او

if me.opt_Test= 1 then
	msgbox "تم النقر على الزر رقم 1"
elseif me.opt_Test= 2 then
	msgbox "تم النقر على الزر رقم 2"
End if

 

جعفر

[looodi]

انا كتبت اوبشن بوتن وليس اوبشن قروب

58 minutes ago, jjafferr said:

وعليكم السلام

 

 Option Group عبارة عن عمل لمجموعة ومجرد برواز خارجي ، والمجموعة لا يكون لها اسم داخل Option Group ، وانما لها رقم ، والرقم هذا يُعطى لحقل Option Group ،

مثلا اعملي Option Group بإسم opt_Test ، وبدون اي شيء داخلها ، يعني اول ما تعمليه في النموذج ، ثم يسألك الاكسس عن اشياء اخرى ، اضغطي على الزر Esc من الكيبورد ،

ثم من تصميم النموذج اختيار مثلا: Toggle Button او Check Box او Option Button واعمليه داخل Option Group ، حيث سترين ان لونه صار اسود ، مما يعني انك تستطيعين عمله هناك ،

الآن اصبح عندك Option Group والذي هو برواز ، وداخله كائن Option Button وفي آخر اعداداته هناك اختيار Option value وهنا تستطيعين اعطاء رقم مميز لكل كائن ،

وهنا تستطيعين ان تعملي Copy/Paste لهذا الكائن واعطاء كل منهم اسمه ورقمه المميز ، والى هنا وينتهي دور هذه الكائنات ،

 

الآن اعملي حدث على نقر opt_Test ، واكتبي فيه:

Select case me.opt_Test
  case 1
	msgbox "تم النقر على الزر رقم 1"
  case 2
	msgbox "تم النقر على الزر رقم 2"
End select

او

if me.opt_Test= 1 then
	msgbox "تم النقر على الزر رقم 1"
elseif me.opt_Test= 2 then
	msgbox "تم النقر على الزر رقم 2"
End if

 

جعفر

 

    ووضعت بدداخلها  اوبشن بتن option group قمت بعمل

 

ووضعت كود اون كلك

Select case me.opt_Test case 1 msgbox "تم النقر على الزر رقم 1" case 2 msgbox "تم النقر على الزر رقم 2" End select

[jjafferr]

حياالله اختي

 

العمل والكود تمام ، لكن كان يجب ان تغيري اسم option group من frame151 الى opt_Test

2 ساعات مضت, jjafferr said:

مثلا اعملي Option Group بإسم opt_Test ،

 

 

جعفر

تم تعديل مايو 4, 2017 بواسطه jjafferr