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 String Compare Kullanımı

Visual Basic Stringi Byte Dizisine Çevirmek

Visual Basic Bir Dizi Kullanarak N Sayının Toplamını Bulma Örneği

Visual Basic Bir Sayının Faktöriyelini Bulma Örneği

Visual Basic Console Uygulamasından Link Açmak