21/10/2005, 09:53
|
 | | | Fecha de Ingreso: enero-2005
Mensajes: 174
Antigüedad: 20 años, 1 mes Puntos: 0 | |
| ya lo hize .... si a alguien le sirve dejo el codigo
tam = tamaño_del_archivo
Do While tam > 1
peso = tam
tam = tam / 1024
i = i + 1
Loop
If i = 1 Then
nombre_tamaño = "bytes"
ElseIf i = 2 Then
nombre_tamaño = "Kb"
ElseIf i = 3 Then
nombre_tamaño = "Mb"
ElseIf i = 4 Then
nombre_tamaño = "Gb"
End If
saludos
__________________
existen 10 tipos de personas los que entienden los numeros binarios y los que no :cool: |