Visual Basic Rastgele Tarih Yaratmak

Visual Basic programlama dilinde rastgele (random) bir tarih yaratmak için aşağıdaki örnek kod kullanılabilir..

Private Function RastgeleTarih() As Date

    Dim start As Date = New DateTime(1900, 1, 1)
    Dim gen As Random = New Random()

    Dim range = (Date.Today - start).Days

    Return start.AddDays(gen.Next(range))

End Function


İlginizi Çekebilir

Visual Basic 1'den N'e Kadar Olan Çift Sayıların Toplamını Bulma ...

Visual Basic Bir Sayının Kuvvetini Alma

Visual Basic Bir Sayının 5'in Katı Olup Olmadığını Gösteren Örnek

Visual Basic 1'den N'e Kadar Asal Sayıları Bulma Örneği

Visual Basic Tarihe Gün Ekleme Veya Çıkarma