25 Eylül 2013 Çarşamba

ASP.NET Controls, MVC Extensions | DevExpress

ASP.NET Controls, MVC Extensions | DevExpress

19 Ağustos 2013 Pazartesi

Visual Basic Sıralama (sort by number with vb.net)

A) SAYILARI SIRALAMA
Girilen sayıları listboxa kaydedip ve tekrar yan listboxtta büyükten küçüğe ve küçükten büyüğe sıralayan program şu şekilde oluşturabilirz:  

sayi 
Yukarıdaki form görüntüsüne sahip programın kodlarını yazınız. İlk düğmeden sayılar girilecek  , 2. ve 3. Düğmeden de sıralama işlemleri yapılacaktır.  
Programımız 3 Button , 3label ve 3ListBoxtan Oluşuyor.. 
Yapılışı; 
Önce Form1′de Değişken Tanımlayacağız; 
Dim sayı(10) As Integer
Dim sayaç, sayaç2, geçici As Integer
Button1 (sayıları gir ) Yazılacaklar; 
For sayaç = 1 To 10
sayı(sayaç) = InputBox(sayaç & ".sayıyı gir")
ListBox3.Items.Add(sayı(sayaç))

Next
Button2 (Küçükten büyüğe) yazılacaklar; 
For sayaç = 1 To 9
For sayaç2 = sayaç + 1 To 10
If sayı(sayaç2) < sayı(sayaç) Then
geçici = sayı(sayaç)
sayı(sayaç) = sayı(sayaç2)
sayı(sayaç2) = geçici

End If
Next
Next

For sayaç = 1 To 10
ListBox1.Items.Add(sayı(sayaç))

Next
Button3 (Büyükten Küçüğe) yazılacaklar, 
For sayaç = 1 To 9
For sayaç2 = sayaç + 1 To 10
If sayı(sayaç2) > sayı(sayaç) Then
geçici = sayı(sayaç)
sayı(sayaç) = sayı(sayaç2)
sayı(sayaç2) = geçici

End If
Next
Next

For sayaç = 1 To 10
ListBox2.Items.Add(sayı(sayaç))

Next