Predmet:Re: zabrana upisa vrijednosti u formi koja je veca od upisane u subformi
E sad to neznam trebao bi primjer.
Neznam jesi li zapisao recordset ili nisi.
Probaj ovo pa ako nece zakaci primjer.
PreuzmiIzvorni kôd (Visual Basic):Private Sub Kolicina_Exit(Cancel As Integer)
Dim Kolicina As Single
Dim Maks As Single
Maks = [Forms]![Forma1]![Forma2].[Form]![Broj]
Kolicina = Me.Kolicina.OldValue
If Kolicina > Maks Then
Call MsgBox("Toliko nema na stanju. ",vbOKOnly + vbApplicationModal + vbDefaultButton1,"Napomena")
SendKeys "{ESC}", True
SendKeys "{ESC}", True
End If
End Sub
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.