Visual Basic Net'de Rastgele Sayı Üretme Uygulaması

vb.net örnekleri

Bu blog içeriğimizde sizlere vb.net random sayı üretme hakkında bilgilendireceğiniz. Sahip olunan birkaç küçük kod parçası ile doğrudan sizlerde bu ve buna benzer uygulamalar gerçekleştirebilirsiniz.

VB.NET Örnek Kodları

Dim sayi, deneme, sans As Integer

        deneme = 0

        Randomize()

        sayi = Math.Round((Rnd(1) * 100), 0)




        Do

            sans = InputBox("sayi giriniz")

            If sans > sayi Then

                MsgBox("Daha küçük bir sayı giriniz")

            ElseIf sans < sayi Then

                MsgBox("Daha büyük bir sayı giriniz")

            ElseIf sans = sayi Then

                MsgBox("Bildiniz")

                Exit Do

            End If

            deneme += 1

            If deneme = 10 Then

                MsgBox("Sayı buydu" & sayi)

                Exit Do

            End If

        Loop

VB.NET Kodların Açıklaması

Sayi ismini verdiğimiz bir sayısal değişkenimizin içerisine random verileri alıyoruz. Random komutu Math. içerisinde çalışmaktadır. Yani Vb.net'de random komutu çalıştırmak isteyenlerin math. 'ı çağırmaları gereklidir. Aksi halde üretilen sayıların rastgele olduğunu söyleyemeyiz.

Random sayı ürettikten sonra kullanıcının bu sayıyı tahmin etmesi amaçlanıyor. Bundan dolayı Do-Loop döngüsü kullanıyoruz. Bu sayede kullanıcı bu sayıyı tahmin edene kadar programımız çalışıyor.

Sizlerde bu kodları değiştirerek farklı uygulamalar gerçekleştirebilirsiniz.