هل أستطيع اختصار لهذا الكود

[امل الماضي]

السلام عليكم ورحمة الله وبركاته
اخواني أرجو مساعدتي في هذا الامر
في صفحة المشروع أريد أن أعرض كتب من نوع pdf
عن طريق الكومبوكس
وضعت هذا الكود
if e_Selection == 2 then
PDF.LoadFile("PDF1", "AutoPlay\\Docs\\1.pdf");

end

if e_Selection == 3 then
PDF.LoadFile("PDF1", "AutoPlay\\Docs\\2.pdf");

end

if e_Selection == 4 then
PDF.LoadFile("PDF1", "AutoPlay\\Docs\\3.pdf");

end

هل بإستطاعتي اختصار هذ الكود لأن عدد الكتب كبير

أرجو المساعدة في هذا الامر وأكون شاكرا لكم

[عبود عبود]

فى الحدث On Select فى الكمبوبوكس فقط ضع الكود التالى :

PDF.LoadFile("PDF1", "AutoPlay\\Docs\\"..e_Selection..".pdf");

[امل الماضي]

والله لا أدري ما أقول

جزاك الله خيري الاخرة والدنيا
جزاك الله ماتتمنى
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .
موفق بإذن الله ... لك مني أجمل تحية . :abc_152:

[محمد بن أحمد أبو حذيفة]

الرجاء اعدة صياغة العنوان لتتم الارشفة الجيدة لللمواضيع ولتسهيل البحث على الاعضاء