VB6 için;
Randomize
Harf = Chr(Math.Round(Rnd() * (122 - 97) + 97)) 'a dan z ye küçük harfler üretir.
Sayi = Math.Round(Rnd() * (9 - 0) + 0) '0 dan 9 a sayılar üretir.
VB.net için;
Randomize
Harf = Chr(Math.Round(Rnd() * (122 - 97) + 97)) 'a dan z ye küçük harfler üretir.
Sayi = Math.Round(Rnd() * (9 - 0) + 0) '0 dan 9 a sayılar üretir.
Hiç yorum yok:
Yorum Gönder
Lütfen paylaşım hakkında görüşünüzü bizimle paylaşın.