Pošto vidim da imaš dosta računskih operacija za obaviti, ponovo moram da predložim da stvaiš da ti ta polja sa ocenama i opravdanim/neopravdanim budu number tip podataka, kao što rekoh, recimo integer.E sad, pošto ti hoćeš da ti prikaže sve u jednoj tabeli predpostavljam, onda je najbolje samo da nadogradiš onaj SQL koji si već koristio, ovako
Code:
Private Sub Command1_Click()
datPrimaryRS.RecordSource = "select sum(val(Opravdano)) AS ukupno FROM Razred"
datPrimaryRS.Refresh
lblUkupno = datPrimaryRS.Recordset.Fields(0).Value
datPrimaryRS.RecordSource = "select [Ime i prezime],Istorija,Matematika,[Maternji jezik]," & _
"Fizika,[Strani jezik],((val(Istorija) + val(Matematika) + val([maternji jezik]) + val(Fizika) + val([Strani jezik])) / 5) " & _
"AS [Srednja ocjena], cint(((val(Istorija) + val(Matematika) + val([maternji jezik]) + val(Fizika) + val([Strani jezik])) / 5)) " & _
"AS Uspjeh,Vladanje,Opravdano,Neopravdano,(val(Opravdano)+val(Neopravdano)) AS Svega from Razred"
datPrimaryRS.Refresh
End Sub
Naravno, ukoliko si promenio tip podataka u bazi ne moraš da koristiš val, znači onaj deo gde stoji
Code:
((val(Istorija) + val(Matematika) + val([maternji jezik]) + val(Fizika) + val([Strani jezik])) / 5)
bi mogao da napišeš i ovako
Code:
((Istorija + Matematika + [maternji jezik] + Fizika + [Strani jezik]) / 5)
-Odracuonogakomijedrpiorazmaknicu.
-Ne rxdi mi txstxturx, kxd god hocu dx
ukucxm "x" onx ukucx "x".
-Ko kaaz e da ja neuummem da kuuca
m.
-Piše "Insert disk 3", a jedva sam i ova
dva ugurao u drajv
-Postoje samo dve osobe kojima
verujem, jedna sam ja, a druga nisi ti