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 |
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
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"
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"
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"
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 "
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"
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"
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"
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"
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"
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"
Dim uzorak As String Dim obrazac As String Dim pozicija As Integer uzorak = "banana" obrazac = "ana" pozicija = InStr(uzorak, obrazac) 'vrednost pozicije je 2
Dim uzorak As String Dim obrazac As String Dim pozicija As Integer uzorak = "banana" obrazac = "ana" pozicija = InStrRev(uzorak, obrazac) 'vrednost pozicije je 4
Dim ulaz As String Dim rezultat As String ulaz = "Pera" rezultat = StrReverse(ulaz) 'vrednost promenljive rezultat je "areP"
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"
Dim rezultat As String rezultat = Space(3) 'vrednost promenljive rezultat je " "
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):
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)
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.