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 Bir Fonksiyonda Birden Fazla Değer Döndürme Örneği

Visual Basic List'e Eleman Ekleme

Visual Basic String EndsWith Kullanımı

Visual Basic Ofis Word'ün Yüklü Olup Olmadığını Bulmak

Visual Basic String Equals Kullanımı