Sanırım array kullanılmak istenmiş. ben array kullandığını varsayarak anlatayım.
yani şöyle olacak

Dim sayilar(4)
sayilar(0) = 5
sayilar(1) = 4
sayilar(2) = 3
sayilar(3) = 2
sayilar(4) = 1

ekucuk = sayilar(0)
for i = 0 to 4
if sayilar(i) < ekucuk Then
ekucuk = sayilar(i)
else
ekucuk = ekucuk
end if
Next

Response.Write(" En Küçük Sayı : " & ekucuk )

Kodu denemedim ama çalışır muhtemelen.
Bu kodun sonucunda Ekrana ;

En küçük Sayı : 1

Vermesi gerekir . Umarım yardımcı olmuşumdur hayırlı çalışmalar.