Centar za edukaciju-BiH


Stranice (4):1,2,3,4

#31 21.05.2015 17:06
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Postovi:1,828


Predmet:Re: Izdvajanje rijeci i/ili znakova iz recorda - funkcija
Ha ha glupava greska vo kucajneto eve ispravno

PreuzmiIzvorni kôd (Visual Basic):
  1. Public Function GT(Podatok, Optional DelBroj As Integer = 1)
  2. Dim RedPod As String
  3. Dim BrojVar As Integer
  4. Dim ArrPodaci
  5. Dim Arr() As String
  6. Dim I As Integer
  7.  
  8.  
  9.  If IsNull(Podatok) Or Podatok = "" Then
  10.     GT = " "
  11.    ' Exit Function
  12. Else
  13.  
  14.   RedPod = Podatok ' "+CRLP: 61,61,78,6"
  15.  Vrati_Podatak RedPod, BrojVar, ArrPodaci
  16.     Arr = Split(ArrPodaci, ",")
  17.    'For I = 0 To BrojVar
  18.    GT = Arr(DelBroj)
  19.  'Next I
  20. End If
  21.  
  22. End Function
↑  ↓

#32 21.05.2015 17:13
Amelasar Van mreze
Clan
Registrovan od:07.04.2011
Postovi:262


Predmet:Re: Izdvajanje rijeci i/ili znakova iz recorda - funkcija
Hvala puno. Ovo je odlično.
Pozdrav, Amela
↑  ↓

Stranice (4):1,2,3,4


Sva vremena su GMT +01:00. Trenutno vrijeme: 1: 00 pm.