Avko 19.06.2025 14:09
Predmet:VBA Excel zasto mi funkcija promijeni vrijednost varijable?

dobar dan

PreuzmiIzvorni kôd (Visual Basic):
  1. sub proba()
  2.    dim varTemp as double
  3.  
  4.    varTemp=102345
  5.    msgbox sec2time(varTemp)
  6.  
  7. next sub
  8.  
  9. function sec2time(s as Double) as String
  10.     Dim sati As Integer
  11.     Dim minuta As Integer
  12.     Dim sekundi As Integer
  13.    
  14.     If s >= 86400 Then
  15.         sati = (s / 86400) * 24
  16.         s = s Mod 86400
  17.     End If
  18.    
  19.     If s >= 3600 Then
  20.         sati = sati + (s / 3600)
  21.         s = s Mod 3600
  22.     End If
  23.    
  24.     If s >= 60 Then
  25.         minuta = s / 60
  26.         s = s Mod 60
  27.     End If
  28.    
  29.     sekundi = s
  30.    
  31.     sec2time = CStr(sati) & ":" & CStr(minuta) & ":" & CStr(sekundi)
  32. End Function

u gornjem kodu, varTemp mi promijeni vrijednost u sekundi. To mi nije jasno.
function sec2time(s as double), jos bi mi bilo jasno da je function sec2time(varTemp as double) ali ovako nesto mi je nejasno. da koristim varTemp za funkciju napisao bi sec2time(byVal varTemp as Double) i nebi se izmjenila no...
zna li netko zasto varTemp promijeni vrijednost?

Gjoreski 19.06.2025 23:21
Predmet:Re:VBA Excel zasto mi funkcija promijeni vrijednost varijable?

Nemoj kosustiti variabla s koja je ulazni podatak u funkcii za izracun jer tako na kraju je promenini i je vracas je nazad . Dodaj nova variabla za izracun unutra funkcije i variabla varTemp nece se mejnati vise