arkadaşlar 3 yazılı 3 sözlü 1 ödev notundan istenilen girdikten sonra ortalam hesaplayan bir fonksiyonu accesste modüle yazdım ancak hesaplama sorunu veriyor
tablodaki yazili1,yazili2.... alanlarını sayı olarak belirledim ve varsayılan değeri sildim
modüle şu fonksiyonu yazdım.
neden çalışmıyor olabilir? fikri olana rep sistemini devre soktukları anda rep vericem
tablodaki yazili1,yazili2.... alanlarını sayı olarak belirledim ve varsayılan değeri sildim
modüle şu fonksiyonu yazdım.
Kod:
Function ortala(a, b, c, d, e, f, g)
bolen = 7
If a = "" Then
bolen = bolen - 1
a = 0
End If
If b = "" Then
bolen = bolen - 1
b = 0
End If
If c = "" Then
bolen = bolen - 1
c = 0
End If
If d = "" Then
bolen = bolen - 1
d = 0
End If
If e = "" Then
bolen = bolen - 1
e = 0
End If
If f = "" Then
bolen = bolen - 1
f = 0
End If
If g = "" Then
bolen = bolen - 1
g = 0
End If
if bolen=0 then ortala="": Exit Function
ortala = (a + b + c + d + e + f + g) / bolen
End Function