Tema: PHP y VB
Ver Mensaje Individual
  #3 (permalink)  
Antiguo 18/10/2004, 13:17
Kren
 
Fecha de Ingreso: septiembre-2004
Mensajes: 13
Antigüedad: 19 años, 6 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...