Listbox'a Rastgele Cümle Atamak


Visual Basic ve .NET Framework    Visual Basic ve .NET Framework İle İlgili Paylaşım Kategorisi

Yazar: x60    0 Yorum    127 Görüntüleme
  • 0 Oy - 0 Yüzde

Paylaşım Tarihi: 13.01.2016, 19:57:44 #1
x60 #Requiem
Cezalı Üye
Status: Çevrimdışı Yorum Sayısı:551 Konu Sayısı:161 Üyelik Tarihi:18.11.2015

Bu dersimizde, textbox'dan girilen bir veriye rastgele kelime aktarıp listboxda göstermeyi öğrenelim..

PHP Kod:
Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
        Dim x 
As Integer
        Randomize
()
 
       x Rnd() * 4
        If x 
1 Then
            ListBox1
.Items.Add(TextBox1.Text " " "zeki")
 
       End If
 
       If x 2 Then
            ListBox1
.Items.Add(TextBox1.Text " " "tembel")
 
       End If
 
       If x 3 Then
            ListBox1
.Items.Add(TextBox1.Text " " "çalışkan")
 
       End If
 
       If x 4 Then
            ListBox1
.Items.Add(TextBox1.Text " " "akıllı")
 
       End If
 
   End Sub 







Aradığınızı Bulamadınız Mı ?

Konuyu görüntüleyenler:
1 Misafir