رفتن به مطلب

کد گرفتن Random عکس از گالری


Salar82

ارسال های توصیه شده

سلام

با کد زیر میتونید یه عکس رو بطور تصادفی از گالری انتخاب کنید:

Dim MB As MediaBrowser
MB.Initialize("MB")
Dim tmp_m As Map = MB.GetMediaImageList(True, "datetaken DESC")
img1.Bitmap = LoadBitmapResize(tmp_m.Get("Location" & Rnd(0,tmp_m.Size/7)),"",img1.Width,img1.Height,True)

 

لینک ارسال
به اشتراک گذاری در سایت های دیگر

بایگانی شده

این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.

  • کاربران آنلاین در این صفحه   0 کاربر

    • هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.
×
×
  • اضافه کردن...