Преглед садржаја
Врати н -ту реч у низу текста
Следећа функција ће пронаћи н -ту реч у низу:
Функција Финд_нтх_ворд (израз као низ, н као цео број) као низ Дим Цуррент_Пос Све док је Дим Дим Ленгтх_оф_Стринг Ас Интегер Дим Цуррент_Ворд_Но Ас Интегер Финд_нтх_ворд = "" Цуррент_Ворд_Но = 1 'Уклони водеће размаке Пхрасе = Трим (Пхрасе) Ленгтх_оф_Стринг = Лен (Фраза) Цуррент = 1 То Ленгтх_оф_Стринг Иф (Цуррент_Ворд_Но = н) Тхен Финд_нтх_ворд = Финд_нтх_ворд & Мид (Пхрасе, Цуррент_Пос, 1) Енд Иф Иф (Мид (Пхрасе, Цуррент_Пос, 1) = "") Тхен Цуррент_Ворд_Но = Цуррент_Ворд_Но + 1 Енд Иф Нект Цуррент_Пос ' Уклоните крајњи десни простор Финд_нтх_ворд = Трим (Финд_нтх_ворд) Крајња функција
Потребна су два аргумента - израз који треба претражити и реч број:
Финд_нтх_ворд(„Аутоматеекцел је омиљена Екцел локација на свету“, 4)
Вратиће се „свет“.
Празно поље се враћа ако је број речи у фрази мањи од наведеног броја речи.
Тако: Финд_нтх_ворд(„Аутоматеекцел је омиљена Екцел локација на свету“, 12)
Вратиће се празно јер нема 12 речи у фрази „Аутоматеекцел је омиљена Екцел локација на свету“.
Преузимање
Кликните овде да бисте преузели .КСЛСМ датотеку из овог чланка
