Prikazi cijelu temu 20.08.2016-20:36
zxz Offline
Administrator
Registrovan/a od: 03.02.2009-16:22
Lokacija: Tuzla


Subject: Instr naredba
Instr ( [start], string ukome se trazi, string koji trazis, [compare] )
VBAkontantaValueObjašnjenje
vbBinaryCompare Binary poređenje
vbTextCompare1Tekstualni poređenje
vbDatabaseCompare2Poređenje zasnovan na bazi podataka
DownloadIzvorni kod (Visual Basic):
  1. Function InstrPrimjer()
  2. Dim Str As String
  3. Dim Znak As String
  4. Dim Pozicija As Integer
  5.  
  6. Str = "Ana voli Milovana"
  7. Znak = "a"
  8. Pozicija = InStr(1, Str, Znak, 0)
  9. 'Pozicija = 3
  10. Pozicija = InStr(1, Str, Znak, 1)
  11. 'Pozicija = 1
  12. Pozicija = InStr(1, Str, Znak, 2)
  13. 'Pozicija = 1
  14. Pozicija = InStr(1, Str, Znak)
  15. 'Pozicija = 1
  16. Pozicija = InStr(7, Str, Znak, 0)
  17. 'Pozicija = 15
  18. End Function

Ukoliko ne navedemo nacinpretrage radit ce kao da smo upisali kao tekstualna pretraga odnosno 1.
Pozdrav