Predmet:Re: Uređivanje Dodjela nagrada
Evo procesura za godine.
Stavi je u Modul.
Function Godine(Od As Integer)
Dim I As Integer
For I = Od To Year(Date)
Godine = Godine & I & ";"
Next I
Godine = Left(Godine, Len(Godine) - 1)
End Function
Na on enter combo boxa stavi
Me.ImetvogComba.Rowsource=Godine(BrojGodineOdkojezelisdapise)
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.