napisao sam sledeći kod:
Private Sub Form_Load()
If RangSen2002.Value = 1 Then
ZB2002Sen = ZB2002Sen + 5
ElseIf RangSen2002.Value = 2 Then
ZB2002Sen = ZB2002Sen + 3
ElseIf RangSen2002.Value = 3 Then
ZB2002Sen = ZB2002Sen + 1
End If
Form.Refresh
End Sub
On mi ovo odradi, ali samo za prvi zapis, za ostale zapise neće. Ako sve ovo stavim na "OnOpen", prijavi da ne može da piše u tabelu, iako je Editovanje dozvoljeno.
[Ovu poruku je menjao tOwk dana 16.07.2003. u 13:12 GMT]