سوال: option box در اکسس [بایگانی]

1397mehrdad

شنبه 25 خرداد 1392, 23:55 عصر

سلام
می خواستم بدونم برای تست اینکه Option box انتخاب شده یا نه چه دستوری در اکسس وجود دارد . در زبان وی بی دستور Checked وجود داره ولی در اکسس چنین دستوری نیست . از دستور value هم استفاده کردم ولی نشد . من یک برنامه دارم می خوام چک کنم که با انتخاب هر optionbox یک گزارش بر حسب همون انتخاب نمایش داده بشه. ضمنا optionbox ها در یک option Group قرار داره .

Abbas Amiri

یک شنبه 26 خرداد 1392, 00:00 صبح

سلام
می خواستم بدونم برای تست اینکه Option box انتخاب شده یا نه چه دستوری در اکسس وجود دارد . در زبان وی بی دستور Checked وجود داره ولی در اکسس چنین دستوری نیست . از دستور value هم استفاده کردم ولی نشد . من یک برنامه دارم می خوام چک کنم که با انتخاب هر optionbox یک گزارش بر حسب همون انتخاب نمایش داده بشه. ضمنا optionbox ها در یک option Group قرار داره .

چون مقدار Optionbox منطقی است ، می تونید مستقیما آنرا در عبارت If چک کنید

If MyChkbox Then ' Or If Not MyChkBox Then
'Type Codes
End If

آخر جمله شما را تازه دیدم ، درمورد OptionGroup از عبارت

If MyOpGroup=MyOpBtnValue Then

استفاده کنید که MyOpBtnValue مقدار آپشن باتن شماست

1397mehrdad

یک شنبه 26 خرداد 1392, 00:09 صبح

همین کار رو کردم ولی نشد . نوشتم
if (option1) then
msgbox("1")
else
msgbox("2")
end if
برنامه هیچ عکس العملی نشون نداد.
راه دیگه ای داره ؟

1397mehrdad

یک شنبه 26 خرداد 1392, 00:17 صبح

اینو نوشم . بازم جواب نداد .
If (Frame0 = Option2) Then
MsgBox ("1")
ElseIf (Frame0 = Option4) Then
MsgBox ("2")
End If
می شه بگید باید دقیقا چی بنویسم؟

1397mehrdad

یک شنبه 26 خرداد 1392, 00:21 صبح

پیغام میده !!!!!!11
You Enterd an expression that has no value

Abbas Amiri

یک شنبه 26 خرداد 1392, 00:26 صبح

اینو نوشم . بازم جواب نداد .
If (Frame0 = Option2) Then
MsgBox ("1")
ElseIf (Frame0 = Option4) Then
MsgBox ("2")
End If
می شه بگید باید دقیقا چی بنویسم؟

باید از اسم OptionGroup استفاده کنید نه OptionBox ها ، و برای مقایسه از مقادیر Option Value آپشن باکسها استفاده کنید . مثلا اگر میخواهید ببینید اولین آپشن انتخاب شده

If OptionGroup0 = 1 Then

استفاده کنید