Ugrađene funkcije

Ugrađene funkcije za konverziju tipova

CInt(izraz)konvertuje tekstuelni ili numerički izraz u vrednost tipa Integer
Round(izraz[, brojDecimala])zaokružuje broj na zadati broj decimala. Ako broj decimala nije zadat, podrazumeva se 0 decimala, tj. vrednost funkcije je ceo broj
CLng(izraz)konvertuje tekstuelni ili numerički izraz u vrednost tipa Long
CSng(izraz)konvertuje tekstuelni ili numerički izraz u vrednost tipa Single
CDbl(izraz)konvertuje tekstuelni ili numerički izraz u vrednost tipa Double
CDate(izraz)konvertuje tekstuelni ili numerički izraz u vrednost tipa Date
CStr(izraz)konvertuje tekstuelni ili numerički izraz u vrednost tipa String
CVar(izraz)konvertuje tekstuelni ili numerički izraz u vrednost tipa Variant

Ugrađene funkcije za rad sa niskama

Primer: Podniske, velika i mala slova

Len(niska)
Vrednost funkcije je dužina ulazne niske, tj. broj karaktera od kojih se sastoji niska (Len dolazi od eng. Length). Primer:
Dim ime As String 'deklaracija promenljive za nisku

Dim duzina As Integer 'deklaracija promenljive za duzinu niske ime

ime = "Pera" 'početna vrednost niske (inicijalizacija)

duzina = Len(ime) 'u promenljivu se upisuje duzina niske 'Pera', tj. 4



Left(niska, dužina)
Vrednost funkcije je prefiks ulazne niske zadate dužine. Primer:
Dim prezime As String 'deklaracija promenljive za nisku

Dim prefiks As String 'deklaracija promenljive za prefiks niske prezime

prezime = "Petrović" 'početna vrednost niske (inicijalizacija)

prefiks = Left(prezime, 3) 'u promenljivu se upisuje prefiks dužine 3, tj. "Pet"

Right(niska, dužina)
Vrednost funkcije je sufiks ulazne niske zadate dužine. Primer:
Dim prezime As String 'deklaracija promenljive za nisku

Dim sufiks As String 'deklaracija promenljive za sufiks niske prezime

prezime = "Milosavljev" 'početna vrednost niske (inicijalizacija)

sufiks = Right(prezime, 4) 'u promenljivu se upisuje sufiks dužine 4, tj. "ljev"

Mid(niska, pozicija, dužina)
Vrednost funkcije je podniska ulazne niske koja počinje na zadatoj poziciji i ima zadatu dužinu (Mid dolazi od eng. Middle). Primer:
Dim prezime As String 'deklaracija promenljive za nisku

Dim infiks As String 'deklaracija promenljive za podnisku niske prezime

prezime = "Milosavljev" 'početna vrednost niske (inicijalizacija)

infiks = Mid(prezime, 5, 3) 'u promenljivu se upisuje infiks koji počinje na poziciji 5 i ima dužinu 3, tj. "sav"

LTrim(niska)
Vrednost funkcije je zadata niske iz koje su uklonjeni eventualni razmaci sa levog kraja niske (L dolazi od eng. Left). Primer:
Dim prezime As String 'deklaracija promenljive za nisku

Dim rezultat As String 'deklaracija promenljive za rezultat

prezime = "   Milosavljev   " 'početna vrednost niske (inicijalizacija)

rezultat = LTrim(prezime) 'u promenljivu se upisuje niska bez razmaka sleva, tj. "Milosavljev   "

RTrim(niska)
Vrednost funkcije je zadata niske iz koje su uklonjeni eventualni razmaci sa desnog kraja niske (R dolazi od eng. Right). Primer:
Dim prezime As String 'deklaracija promenljive za nisku

Dim rezultat As String 'deklaracija promenljive za rezultat

prezime = "   Milosavljev   " 'početna vrednost niske (inicijalizacija)

rezultat = RTrim(prezime) 'u promenljivu se upisuje niska bez razmaka zdesna, tj. "   Milosavljev"

Trim(niska)
Vrednost funkcije je zadata niske iz koje su uklonjeni eventualni razmaci sa oba kraja niske. Primer:
Dim prezime As String 'deklaracija promenljive za nisku

Dim rezultat As String 'deklaracija promenljive za rezultat

prezime = "   Milosavljev   " 'početna vrednost niske (inicijalizacija)

rezultat = Trim(prezime) 'u promenljivu se upisuje niska bez razmaka sa oba kraja, tj. "Milosavljev"

Lcase(niska)
Vrednost funkcije je zadata niska u kojoj je svako veliko slovo zamenjeno odgovarajućim malim slovom (eng. lower case, odatle Lcase). Primer:
Dim prezime As String 'deklaracija promenljive za nisku

Dim rezultat As String 'deklaracija promenljive za rezultat

prezime = "Milosavljev" 'početna vrednost niske (inicijalizacija)

rezultat = Lcase(prezime) 'u promenljivu se upisuje niska sa odgovarajućim malim slovima, tj. "milosavljev"

Ucase(niska)
Vrednost funkcije je zadata niska u kojoj je svako malo slovo zamenjeno odgovarajućim velikim slovom (eng. upper case, odatle Ucase). Primer:
Dim prezime As String 'deklaracija promenljive za nisku

Dim rezultat As String 'deklaracija promenljive za rezultat

prezime = "Milosavljev" 'početna vrednost niske (inicijalizacija)

rezultat = Ucase(prezime) 'u promenljivu se upisuje niska sa odgovarajućim velikim slovima, tj. "MILOSAVLJEV"

Split(niska, separator)
Vrednost funkcije je niz niski (indeksiran počev od nule) dobijenih razbijanjem date niske na delove koji su u polaznoj niski bili razdvojeni zadatim separatorom. Ima suprotnu ulogu u odnosu na funkciju Join. Primer:
 Dim engDatum As String
 
 Dim rezultatNiz() As String
 
 engDatum = "12/5/2010"
 
 rezultatNiz = Split(engDatum, "/")
 
 ' rezultatNiz sada ima tri elementa
 ' rezultatNiz(0) = "12"
 ' rezultatNiz(1) = "5"
 ' rezultatNiz(2) = "2010"
Join(nizNiski, separator)
Vrednost funkcije je niska dobijena spajanjem niski zadatog niza (indeksiranog počev od nule), koje su u rezultujućoj niski razdvojene zadatim separatorom. Ima suprotnu ulogu u odnosu na funkciju Split. Primer:
 Dim engDatum As String
 
 Dim niz() As String
 
 niz(0) = "12"
 niz(1) = "5"
 niz(2) = "2010"
 
 engDatum = Join(niz, "/")
 
 'engDatum sada ima vrednost "12/5/2010"
  
InStr(uzorak, obrazac)
Ako niska uzorak sadrži nisku obrazac kao podnisku, vrednost funkcije je pozicija prve pojave (sleva nadesno) te podniske. U protivnom, vrednost funkcije je nula. Primer:
 Dim uzorak As String
 
 Dim obrazac As String
 
 Dim pozicija As Integer
 
 uzorak = "banana"
 
 obrazac = "ana"
 
 pozicija = InStr(uzorak, obrazac)
 'vrednost pozicije je 2
InStrRev(uzorak, obrazac)
Ako niska uzorak sadrži nisku obrazac kao podnisku, vrednost funkcije je pozicija poslednje pojave (sleva nadesno) te podniske. U protivnom, vrednost funkcije je nula. Primer:
 Dim uzorak As String
 
 Dim obrazac As String
 
 Dim pozicija As Integer
 
 uzorak = "banana"
 
 obrazac = "ana"
 
 pozicija = InStrRev(uzorak, obrazac)
 'vrednost pozicije je 4
StrReverse(niska)
Vrednost funkcije je niska dobijena od date niske tako što su karakteri zapisani u obrnutom poretku Primer:
 Dim ulaz As String
 Dim rezultat As String
 
 ulaz = "Pera"
 rezultat = StrReverse(ulaz)
 'vrednost promenljive rezultat je "areP"
Format(izraz, formatVrednosti)
Vrednost funkcije je niska koja predstavlja zapis vrednosti datog izraza formatiranog u skladu sa zadatim formatom. Ovde će biti predstavljeni samo numerički formati (0 znači cifra ili nula, # znači cifra ili prazna niska). Primer:
 Dim n As Integer
 Dim x As Double
 Dim sn As String 'formatirani zapis za n
 Dim sx As String 'formatirani zapis za x
 
 n = 1234
 x = 23.45678
 
 sn = Format(n, "00000") 'broj se zapisuje kao petocifren, ako je kraci, dopunjava se nulama
 'sada sn ima vrednost "01234"
 
 sn = Format(n, "#####") 'broj se zapisuje najvise kao petocifren
 'sada sn ima vrednost "1234"
 
 sn = Format(n, "#.00") 'broj se zapisuje sa samo dve decimale, ako ih nema, stoje nule
 'sada sn ima vrednost "1234.00"
 
 sx = Format(x, "#.00") 'broj se zapisuje sa samo dve decimale, ako ih nema, stoje nule
 'sada sx ima vrednost "23.46"
 
 
Space(brojN)
Vrednost funkcije je niska sastavljena od brojN razmaka. Primer:
 Dim rezultat As String
 
 rezultat = Space(3)
 
 'vrednost promenljive rezultat je "   "

Ugrađene funkcije za unos podataka

Funkcija InputBox prikazuje dijalog koji očekuje od korisnika da unese neku vrednost (broj ili tekst) i da potom klikne na odgovarajuće dugme (OK/Cancel). Vrednost funkcije je uneta vrednost.

Ova funkcija ima samo jedan obavezan argument (poruka korisniku šta da unese) dok su ostali argumenti neobavezni (najčešće se koriste naslov dijaloga i podrazumevana vrednost koja se nudi korisniku). Stoga se ova funkcija uobičajeno koristi na jedan od sledeća dva načina (ulaz je promenljiva nekog tipa koja prihvata korisnikov unos):

  1. ulaz = InputBox(poruka). Npr. ulaz = InputBox("Unesite ceo broj veći od 2").
  2. ulaz = InputBox(poruka, naslovDijaloga, podrazumevanaVrednost).
    Npr. ulaz = InputBox("Unesite ceo broj veći od 2", "Ulaz", 3).

Funkcije se mogu koristiti samo u okviru izraza, te mora postojati promenljiva kojoj se dodeljuje rezultat funkcije InputBox:

Dim ulaz As String 'deklaracija promenljive kojoj se dodeljuje ulaz 

ulaz = InputBox("Unesite ceo broj veći od 2", "Ulaz", 3)

Ugrađene funkcije za ispisivanje poruka

Funkcija MsgBox (skr. od eng. Message Box) prikazuje dijalog sa obaveštenjem za korisnika, a potom čeka da korisnik klikne na odgovarajuće dugme (OK, OK/Cancel, Yes/No, Yes/No/Cancel, Abort/Retry/Ignore, Retry/Cancel). Vrednost funkcije je konstanta koja ukazuje na koje dugme je korisnik kliknuo.

Najjednostavnija upotreba funkcije MsgBox je

MsgBox(poruka)

koja prikazuje samo jedno dugme (OK) na koje korisnik može da klikne.