VB.Net ile sayı sıralama programı yapmak oldukça basittir. Aşağıda, kullanıcıdan bir dizi sayı alarak bu sayıları sıralayan bir program örneği verilmiştir:
vb.net
Sub Main()
Dim sayilar() As Integer
Dim n, temp As Integer
Console.Write("Kaç tane sayı gireceksiniz? ")
n = Console.ReadLine()
ReDim sayilar(n - 1)
For i As Integer = 0 To n - 1
Console.Write("Sayı {0}: ", i + 1)
sayilar(i) = Console.ReadLine()
Next
For i As Integer = 0 To n - 2
For j As Integer = i + 1 To n - 1
If sayilar(j) < sayilar(i) Then
temp = sayilar(i)
sayilar(i) = sayilar(j)
sayilar(j) = temp
End If
Next
Next
Console.WriteLine("Sıralı Dizi: ")
For i As Integer = 0 To n - 1
Console.Write("{0} ", sayilar(i))
Next
Console.ReadKey()End Sub
Yukarıdaki programda, kullanıcıdan kaç tane sayı gireceğini sormak için n adında bir değişken kullanılmaktadır. Daha sonra, ReDim işlevi kullanılarak, girilen sayıları depolamak için bir dizi oluşturulmaktadır. Ardından, kullanıcıdan her sayıyı almak için bir For döngüsü kullanılmaktadır.
Daha sonra, iki For döngüsü kullanılarak, dizinin elemanları sıralanmaktadır. İlk döngü, dizi elemanlarını tek tek dolaşmaktadır. İkinci döngü, ilk döngünün üzerinde başlar ve dizinin geri kalan elemanlarını kontrol ederek elemanları karşılaştırır. Eğer bir sonraki eleman, mevcut elemandan küçükse, bu elemanlar yer değiştirilir.
Son olarak, sıralanmış dizi ekrana yazdırılır. Yukarıdaki örnek program, sadece tam sayılar için çalışacak şekilde tasarlanmıştır. Ancak, ondalık sayılar gibi diğer veri türleri de kullanılabilir. Ayrıca, farklı sıralama algoritmaları kullanılarak da program yazılabilir.