Datos en textbox dependiendo de otros textbox

[yojjbc]

Hola a todos ,
La verdad es que estoy algo liado con if,else,then y de más.(tengo un nivel muy bajo )
Resulta que despues de varios cálculos en unos cuantos textbox
quiero que dependiendo del resultado escribe algo en otros textbox.

ejemplo:
Esto se genera aleatoriamente cada vez que apretamos un botón ;
....................Cálculo..........
textbox 1......03,59..........
textbox 2......08,83..........
textbox 3......00,73..........
textbox 4......86,85..........
textbox 5.....100,00..........

Y este código los ordena :

Código PHP:

  Dim Ordenar(4) As Decimal 
        Dim i As Integer, j As Integer, k As Decimal 
        Ordenar(0) = CDec(TextBox1.Text) 
        Ordenar(1) = CDec(TextBox2.Text) 
        Ordenar(2) = CDec(TextBox3.Text) 
        Ordenar(3) = CDec(TextBox4.Text) 
         For i = 0 To 2 
        For j = i + 1 To 3 
        If Ordenar(i) > Ordenar(j) Then 
        k = Ordenar(i) 
         Ordenar(i) = Ordenar(j) 
         Ordenar(j) = k 
 
         End If 
        Next j 
        Next i 
 
        TextBox103.Text = Str(Ordenar(3)) 
        TextBox102.Text = Str(Ordenar(2)) 
        TextBox101.Text = Str(Ordenar(1)) 
        TextBox100.Text = Str(Ordenar(0))  
   

Con el anterior código hacemos que el valor de los textbox 100 a textbox103 salgan bien ordenados

A ver quien me puede ayudar para que de los textbox 100 a 103 conseguir este resultado :

ejemplo:.....Posición......
textbox 6...... 3º..........
textbox 7...... 2º..........
textbox 8...... 4º..........
textbox 9...... 1º..........


SALUDOS Y GRACIAS por su atención.

[eledgarr]

No se entiende bien lo que deseas hacer

[yojjbc]

Iniciado por eledgarr

No se entiende bien lo que deseas hacer

Hola eledgarr,
pues la verdad es que lo he liado mucho.
En primer lugar gracias por tu rápida contestación.
A ver si ahora me aclaro un poco mejor.
tengo 3 grupos de textbox:
el primero se generan numeros aleatorios con 2 decimales dando clik en un boton
(una vez solucione este problema quitaré el boton y los datos se meterian manualmente)
el segundo me los ordena con el codigo que expuse en el primer post
y en el tercero quiero especificar que orden ocupa en el grupo :

ejemplo:
grupo 1..........ALMACEN
1.-peras..........15,45 kg
2.-manzanas...30,25 kg
3.-naranjas......85,30 kg
4.-plátanos......25.00 kg

grupo 2......ORDENADOS......grupo 3
1.-....................85,30 kg......naranjas
2.-...................30,25 kg.......manzanas
3.-...................25.00 kg.......plátanos
4.-...................15,45 kg.......peras

El problema que tengo es que el grupo 2 me salen decimales con puntos en vez de comas y logicamente no los puedo igualar con if , then y de más.

SALUDOS Y GRACIAS DE NUEVO.

[rikakashi]

En lo que entendi de los decimales con punto y no la coma puedes utilizar el replace

textbox1 = replace(textbox1,".",",")
esto te hara de 58.30 a 58,30

Suerte en lo demas que no llegue a entender