Şimdi Ara

VB 2010 console application

Daha Fazla
Bu Konudaki Kullanıcılar: Daha Az
1 Misafir - 1 Masaüstü
5 sn
2
Cevap
0
Favori
843
Tıklama
Daha Fazla
İstatistik
  • Konu İstatistikleri Yükleniyor
0 oy
Öne Çıkar
Sayfa: 1
Giriş
Mesaj
  • Module Module1
    Dim a(20) As Integer
    Sub Main()
    Randomize()
    For i = 1 To 20
    a(i) = (50 + (Rnd() * 50))
    Console.WriteLine(a(i))
    Next
    Console.ReadLine()
    End Sub

    End Module

    Uygulama amacı rastgele ve birbirinden farklı sayılar üretmek rastgele sayı üretmek kısmını hallettim ama farklı sayılar üretemiyorum aynı sayıdan bazen 2-3 tane üretebiliyor bunu nasıl halledebilirim.



  • Üretilen sayları bir diziye at ve atmadan önce dizide yanı sayı var mı diye kontrol et.
    Sonra ekrana diziyi yazdırırsın.
  • 
Sayfa: 1
- x
Bildirim
mesajınız kopyalandı (ctrl+v) yapıştırmak istediğiniz yere yapıştırabilirsiniz.