Este código de muestra le ayuda a ver para qué matrices se pueden usar y también muestra un bucle en acción.

Digamos que desea que el usuario ingrese una oración, y luego desea que sepan cuántas veces usaron cada letra del alfabeto. Entonces, si el usuario escribió:

Me comí mi gato.

Volvería una página que decía:

a: 2
c: 1
e: 1
yo: 1
m: 1
t: 2
y: 1

OK, primer paso. Desea contar 26 elementos diferentes, uno para cada letra del alfabeto. Esto casi grita formación. Así que comienza con un

Dim LetterCount (26)
para CurrLtr = 1 a 26
LetterCount (CurrLtr) = 0
siguiente

Ese es un buen ejemplo de un ciclo for-next. OK, hasta ahora todo bien. Tienes 26 puntos en cero, esperando comenzar a contar. Ahora trabaje a través de la oración para ver qué contiene. Digamos que llamas a esta oración CurrText.

Primero, desea verificar cada letra en la oración. Haré esto con un ciclo do-while para que pueda ver cómo funciona. Entonces comenzarías con:

SenLen = len (CurrText)
CurrCtr = 1
hacer mientras CurrCtr <= SenLen
CurrLtr = left (CurrText, 1)

Tienes la siguiente carta en orden. Ahora, cada letra, por supuesto, tiene un valor ASCII asociado. Esos van de 65 para A a 90 para Z. El caso sí importa. A continuación, escribe en mayúscula la letra para asegurarse de que se encuentre entre 65 y 90, y reste 64 para que A = 1 y Z = 26.

CurrLtr = ucase (CurrLtr)
CurrLtrA = asc (CurrLtr)
CurrLtrA = CurrLtrA - 64

Así que ahora tienes un número del 1 al 26 que indica qué letra es esta. El siguiente paso es, por supuesto, fácil. ¡Simplemente incrementa ese cubo! Si lo desea, puede asegurarse de ignorar cualquier no carta, si le preocupa que entren en la transmisión.

si CurrLtrA> 0 y CurrLtrA <65, entonces
LetterCount (CurrLtrA) = LetterCount (CurrLTrA) + 1
terminara si

Y ahora, al final del ciclo, te deshaces de la letra en la que estabas trabajando para que cuando vayas en el ciclo, la primera letra de la oración sea la siguiente en orden.

CurrText = Derecha (CurrText, len (CurrText) - 1)
CurrCtr = CurrCtr + 1
lazo

Entonces, su matriz está llena de números que van desde 0 a lo que sea, cada uno indicando cuántas veces se encontró esa letra. Puede mostrarlos de la forma que desee. Si desea utilizar un bucle y la función CHR, que muestra la letra que tiene un cierto código ASCII, puede hacer lo siguiente:

para CurrLtr = 1 a 26
respuesta.escribe "La carta"
CurrAscii = CurrLtr + 64
CurrLtrA = chr (CurrAscii)
response.write CurrLtrA & "fue encontrado"
response.write LetterCount (CurrLtr) & "veces.
"
siguiente

¡Asegúrese de visitar nuestros foros o escriba si tiene alguna pregunta!

Introducción al ASP Ebook

Descargue este libro electrónico para obtener todo lo que necesita saber sobre el aprendizaje de ASP, desde un tutorial paso a paso hasta listas de funciones, código de muestra, errores y soluciones comunes, ¡y mucho más! 101 páginas.

Instrucciones De Vídeo: 49. Programación en C++ || Cadenas || Ejercicio - Contando cada vocal en una frase (Marzo 2024).