18/10/2004, 13:17
|
| | | Fecha de Ingreso: septiembre-2004
Mensajes: 13
Antigüedad: 20 años, 2 meses Puntos: 0 | |
| Eso puede escribirse otra vez como...:
For IA = 1 To 3
If (A(1, IA) = 1) Then
W(IA) = X
ElseIf (A(1, IA) = 0) Then
W(IA) = Y
Else
W(IA) = ""
End If
FPROGRESS.ProgressBar1.Value = FPROGRESS.ProgressBar1.Value + 1
Next IA
Ahi es un poco mas claro....
Pli... Ayudenme... |