استفاده از IF [بایگانی]

اوبالیت به بو

یک شنبه 30 دی 1386, 09:53 صبح

سلام
من یه مشکلی برام پیش اومده که وقتی بهش برخورد می کنم واقعاً خندم می گیره.
من تویه برنامم مجبورم برای آدرس دهی یه سری عکس از چندین IF تویه یه ListBox استفاده می کنم.
در رویداد Click یه ListBox نوشتم:

if ((LblTittle.Caption="کاردانش" )And (LblSilaves.Caption="وزارت راه و ترابری") Then
Image1.Picture=LoadPicture(""& App.Path&"\Silaves\01\Image - 01.Jpg"))
End If

و دوباره چندین If در یک List وجود داره و متاسفانه هیچ وقت برنامه به آدرس مورد نظر عکس نمی ره.
آیا کد من ایرادی داره؟

ƒxmahdi

یک شنبه 30 دی 1386, 10:24 صبح

آقای obalitjoOon مسلمه که برنامه شما در دستور :
Image1.Picture=LoadPicture(""& App.Path&"\Silaves\01\Image - 01.Jpg
مشکل داره اگه شما بفرمایید چرا قبل از app.path از رشته null استفاده کردید و چرا
Image - 01.Jpg را بکار بردید من بیشتر می تونم کمک کنم

ftmotlagh

یک شنبه 30 دی 1386, 10:31 صبح

1-اون دو تا پرانتز چیه ...
شما یک دونه پرانتز باز کردید ...
2-مطمئنیدبین ایمیج و - فاصله وجود داره...

اوبالیت به بو

یک شنبه 30 دی 1386, 10:33 صبح

از رشته Null استفاده نکردم؟؟؟؟؟؟؟؟؟
Image - 01.jpg رو بکار بردم چون این عکس مربوط به اون سازمان مورد نظر هستش و کاربر برای مشاهده بخشنامه ها رویه یه لیست کلیک می کنه که توش عکس های مربوطه هستند و این Image - 01.jpg بخشنامه شماره 1 اون نهاد هست. هر نهادی برای خودش چندین بخشنامه و اصلاحیه داره.

اوبالیت به بو

یک شنبه 30 دی 1386, 10:49 صبح

این عکس برنامم هستش. تویه لیست سبز رنگ عکس ها نمایش داده میشن و کاربر با کلیک رویه عکس ها می تونه اون بخشنامه رو ببینه. حالا شما تصور کنید این همه عنوان و عکس وجود داره که موندم چی جوری اونها رو آدرس دهی کنم.
حدود 50 تا عکس تویه پوشه های مختلف هست.

اوبالیت به بو

یک شنبه 30 دی 1386, 10:51 صبح

1-اون دو تا پرانتز چیه ...
شما یک دونه پرانتز باز کردید ...
2-مطمئنیدبین ایمیج و - فاصله وجود داره...
البته اون پرانتز رو اصلاح کردم و کردمش 2تا.
راجب فاصله هم بله مطمئنم خودم اینجوری بهش اسم دادم.:گریه:

ftmotlagh

یک شنبه 30 دی 1386, 10:53 صبح

1-اون دو تا پرانتز چیه ...
شما یک دونه پرانتز باز کردید ...

ƒxmahdi

یک شنبه 30 دی 1386, 10:55 صبح

آقای obalitjoOon من یه کم تغییر دادم و برنامه کار کرد

اوبالیت به بو

یک شنبه 30 دی 1386, 12:30 عصر

وقتی آدرس دهی می کنم میگه:

RunTime Error '76'
Path not Found

ƒxmahdi

یک شنبه 30 دی 1386, 13:11 عصر

این مشکل مربوط به برنامه شماست با برنامه من مشکل حل نشد بابا خیلی راحته

اوبالیت به بو

یک شنبه 30 دی 1386, 13:14 عصر

مشکلم حل شد. یه "" قبل از App.Path گذاشته بودم که نباید این رو میزاشتم + یه \ باید قبل آدرس پوشه مورد نظر میزاشتم.
از همه دوستان ممنونم.