PDA

View Full Version : درخواست کمک فوری از اساتید محترم



mahmodi1
سه شنبه 14 اسفند 1397, 10:26 صبح
با سلام و حسته نباشید خدمت اساتید محترم
لطفا منو راهنمایی بفرمایید. من تو اکسس مبتدیم ممنون میشم کمکم کنید . با تشکر
من یه فرم ساختم که تو اون یه کمبوباکس هستش و اون کمبو دارای 5 گزینه ( مثلا ریاضی - ادبیات - شیمی - زیست - منطق ) هستش
حالا من میخوام با انتخاب مثلا با انتحاب گزینه ریاضی فرم مربوط به ریاضی مثلا با اسم hesab باز بشه و با انتحاب گزینه زیست فرم zist باز بشه . ممنون میشم راهنمایی بفرمایید.با تشکر

the_hint
شنبه 18 اسفند 1397, 12:00 عصر
من هم خیلی وقت نیست که شروع کردم ولی به نظرم باید توی رویدادafter change کمبو باکس یک کد بنویسی که محتویات داخل کمبو باکس رو چک کنه و مثلا اگه مساوی با زیست بود فرم مربوط به زیست رو باز کنه

mohammadsaleh
شنبه 18 اسفند 1397, 18:39 عصر
یک کمبو درست کن اسم درسها رو بنویس
در رویداد کلیک یک دکمه هم کدهایی شبیه زیر رو

Private Sub Command0_Click()


Select Case Me.Combo1
Case Is = "zist"

DoCmd.OpenForm "frmzist"
Case Is = "chimi"
DoCmd.OpenForm "frmchimi"
Case Is = "riazi"
DoCmd.OpenForm "frmriazi"
End Select


End Sub




البته شما zist رو در کمبو فارسی بنویس

mahmodi1
یک شنبه 19 اسفند 1397, 14:35 عصر
وای متشکرم استاد محترم . فک کنم مشکلم حل شد. ممنون که جواب دادین