Odredjivanje broja elemenata u nizu VB6

Odgovori Nova tema

4 odgovora
3.699 pregleda

Odredjivanje broja elemenata u nizu VB6 04.07.2008. u 11:50 · pre 223 meseca #1

Dva pitanjca za ljubitelje Visual Basica

Kako da prebrojim koliko puta se neko odredjeno slovo nalazi u stringu? Moje drugo pitanje je da li i kako je moguce prebrojati koliko niz ima elemenata, npr. Nakon sto je string podeljen sa komandom split, interesuje me kako mogu da znam na koliko "delova" je podeljen.

Hvala

Potpis

---------------------
****
< 9 9 > My name
..( o ).. is
. . -- . .MX86251 ?

Re: Odredjivanje broja elemenata u nizu VB6 04.07.2008. u 12:01 · pre 223 meseca #2

Citat:

Aleksandrov:Kako da prebrojim koliko puta se neko odredjeno slovo nalazi u stringu?

Code:

Private Function BrojPojavljivanja(ByVal strText As String, ByVal strChar As String) As Integer
   Dim strCleared As String

   strCleared = Replace(strText, strChar, "")

   BrojPojavljivanja = Len(strText) - Len(strCleared)

End Function

Citat:

Aleksandrov:Moje drugo pitanje je da li i kako je moguce prebrojati koliko niz ima elemenata, npr. Nakon sto je string podeljen sa komandom split, interesuje me kako mogu da znam na koliko "delova" je podeljen.

Tako sto pozoves UBound() funkciju.

Re: Odredjivanje broja elemenata u nizu VB6 04.07.2008. u 12:20 · pre 223 meseca #3

E da, ovaj Ubound() mi treba,
Hvala ti Gorane

Potpis

---------------------
****
< 9 9 > My name
..( o ).. is
. . -- . .MX86251 ?

Re: Odredjivanje broja elemenata u nizu VB6 04.07.2008. u 14:26 · pre 223 meseca #4

Citat:

goranvuc: Tako sto pozoves UBound() funkciju.

Mislis UBound - LBound + 1? :)

Potpis

Nebojsa Milanovic:
-Trumpa smatram vrhunskim predsednikom i voleo bih da živim u državi na čijem je on čelu
-Rusija ne laže, ne vodi osvajačke ratove
-Trump je svetla tačka u USA blatu
-Elon Musk, možda najpametniji i najtrezveniji Amerikanac

Re: Odredjivanje broja elemenata u nizu VB6 04.07.2008. u 14:37 · pre 223 meseca #5

Citat:

Shadowed: Mislis UBound - LBound + 1? :)

Pa posto je niz dobio kao rezultat Split() funkcije onda je dovoljan UBound()

Naravno + 1 ako je Option Base = 0

P.S. Sta bi s' onim juce ?

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Forum kao aplikacija na telefonu

Srodne teme