Imam naslednjo nalogo, ki je nikakor ne morem rešiti zato bi vas prosila če mi napišete kodo!
In sicer naloga je sledeča:
Sestavite funkcijo, ki poišče vse skrite podnize v nizu. Skriti nizi so tisti nizi, ki jih dobimo tako, da iz niza jemljemo vsako drugo ali vsako tretjo, četrto ... črko. Če jemljemo, denimo, vsako tretjo črko, lahko začnemo pri prevm, drugem ali tretjem znaku besede. Primer: Če funkcijo pokličemo z argumentom "Fakulteta", mora kot rezultat vrniti niz
"Fklea autt Fue alt kta Fla at ke ut"
Več kot prva dva člena ne zanm dobiti!
Koda: Izberi vse
Function podniz(x As String) As String
m = 1
For j = 1 To 2
For i = m To Len(x) Step 2
n = Mid(x, i, 1)
rez = rez & n
Next
rez = rez & " "
m = m + 1
Next
MsgBox rez
End Function
Hvala in lep dan, missy.