Napisano: 03 Jun 2009 19:30
Zadatak glasi ovako:Napisati VBA strukturu u accesu koji ce na osnovu unete budzetske vrednosti 20 000 do 100 000 prikazati poresku stopu od 5%,zatim od 100 000 do 200 000 prikazati stopu od 7 % i za unete vrednosti vise od 200 000 prikazati poresku stopu od 9 %
slabo poznajem rad sa VB-om,znam da radim samo sa "select case" programskim petljama a mislim da bi se ovde trebalo primeniti "if" programska petlja...
Dopuna: 03 Jun 2009 19:52
Public Sub vlasto()
Dim porez As String
porez = InputBox("unesite budzetsku vrednost")
If porez > 20000 And porez < 100000 Then
MsgBox "stopa = 5"
ElseIf porez > 100000 And porez < 200000 Then
MsgBox "stopa = 7"
ElseIf porez > 200000 Then
MsgBox "stopa = 9"
Else
MsgBox "greska"
End If
Exit Sub
End Sub
brishi temu,odradio sam :-)
|