Цей зразок коду допомагає побачити, для чого можна використовувати масиви, а також показує цикл у дії.
Скажімо, ви хочете, щоб користувач вводив речення, а потім хочете повідомити, скільки разів вони використовували кожну букву алфавіту. Отже, якщо користувач набрав:
Я їв свою кішку.
Ви повернете сторінку, на якій написано:
a: 2
c: 1
е: 1
i: 1
м: 1
т: 2
у: 1
Добре, крок перший. Ви хочете порахувати 26 різних елементів, по одному для кожної літери алфавіту. Це просто про крики
масив. Тож почніть з а
Темний лист (26)
для CurrLtr = 1 до 26
LetterCount (CurrLtr) = 0
наступний
Це хороший приклад циклу for-next. Добре, поки що добре. У вас 26 плям на нулі, чекаючи, коли почнете рахувати. Тепер попрацюйте через речення, щоб побачити, що в ньому. Скажімо, ви називаєте це речення CurrText.
Спочатку потрібно перевірити кожну букву в реченні. Я зроблю це за допомогою циклу до виконання, щоб ви могли бачити, як це працює. Отже, ви б почали з:
SenLen = len (CurrText)
CurrCtr = 1
робити, поки CurrCtr <= SenLen
CurrLtr = зліва (CurrText, 1)
Наступний лист у вас за порядком. Тепер кожна буква, звичайно, має значення, пов’язане з нею. Вони варіюються від 65 до A до 90 для Z. Case має значення. Отже, наступна велика літера переконайтеся, що вона падає між 65 і 90, і відніміть 64, щоб A = 1 і Z = 26.
CurrLtr = ucase (CurrLtr)
CurrLtrA = asc (CurrLtr)
CurrLtrA = CurrLtrA - 64
Тож тепер у вас є число від 1 до 26, яке вказує, яка це літера. Наступний крок, звичайно, легкий. Ви просто збільшуєте це відро! За бажанням ви можете ігнорувати будь-які нелисті листи, якщо ви переживаєте, як вони потраплять у потік.
якщо CurrLtrA> 0 і CurrLtrA <65, то
LetterCount (CurrLtrA) = LetterCount (CurrLTrA) + 1
закінчується, якщо
А тепер кінець циклу, ви позбудетесь того листа, над яким ви тільки працювали, так що коли ви обходите цикл, перша літера в реченні - наступна по порядку.
CurrText = Право (CurrText, len (CurrText) - 1)
CurrCtr = CurrCtr + 1
петля
Тож тепер ваш масив заповнений цифрами, починаючи від 0 до будь-яких, кожен із яких вказує, скільки разів ця літера була знайдена. Ви можете їх відображати будь-яким способом. Якщо ви хочете використовувати цикл і функцію CHR, яка показує букву з певним кодом ASCII, ви можете зробити:
для CurrLtr = 1 до 26
response.write "Лист"
CurrAscii = CurrLtr + 64
CurrLtrA = chr (CurrAscii)
response.write CurrLtrA & "було знайдено"
response.write LetterCount (CurrLtr) & "разів.
"
наступний
Не забудьте завітати на наші форуми або написати, якщо у вас є якісь питання!
| Вступ до ASP Ebook
Завантажте цю книгу, щоб отримати все, що вам потрібно знати про вивчення ASP - від покрокового підручника до списку функцій, зразкового коду, поширених помилок та рішень та багато іншого! 101 сторінка. |
Відео Інструкція: 12 Функция Excel ЧАСТОТА (Квітня 2024).