sql >> Base de Datos >  >> RDS >> Access

Bucles for rápidos y sucios en la ventana inmediata

A veces quiero recorrer un conjunto de elementos mientras estoy desarrollando, solucionando problemas o depurando algún código y no vale la pena crear una Función o Subrutina real. En esas situaciones, me gusta usar el carácter de dos puntos al final de la declaración (: ) para ejecutar varias sentencias– incluidos los bucles For completos–en una sola línea de la ventana Inmediato .

He aquí un ejemplo:

For i = 0 To CurrentDB.TableDefs.Count - 1: ?i, CurrentDB.TableDefs(i).Name: Next i

La única línea de código anterior es equivalente al siguiente código tradicional:

For i = 0 To CurrentDB.TableDefs.Count - 1
    Debug.Print i & vbTab & CurrentDB.TableDefs(i).Name
Next i

Me siento obligado a mencionar que, si bien el ejemplo de código de la parte superior de este artículo es una sintaxis perfectamente válida que podría usar en un módulo de código tradicional, es terriblemente ilegible* y solo debe usarse para un desarrollo "rápido y sucio". en la Ventana Inmediata donde se garantiza que desaparecerá para siempre tan pronto como salga de la aplicación (o sobrecargue el búfer de la Ventana Inmediata).