random fonksiyonu ve vb6 nın index imkanlarını kullanarak yapabilirsin