Ty obrázky tam jsou po kategoriích stejné.Respektive nejsou náhodné (v tom programu).A já se chlubit nepotřebuju a nechce se mi do toho.Postup je následující:- názvy obrázků načteš do pole-Vygeneruješ náhodný index poleDim TrigB As Random Dim numberb As Integer TrigB = New Random numberb = TrigB.Next(0, 21)A numberb použiješ jako index pole (zde pro dvacet obrázků - index 0 až 20).To, jestli to okořeníš stahováním nebo budeš mít obrázky na disku už je tvoje věc.