Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: Sumowanie danych z tabeli
szakal



Typ: neutral
Postów: 3
Zarejestrowany: May 2004
Sumowanie danych z tabeli

Witam, mamproblem z sumowaniem danych z tabeli

Mam tabelę Liczby(10)

wkażdej tozycji tabeli jest jakaś cyfra dziesiętna (np. 4,56) jak zsumować wszystkie pozycje, zeby wyszedł wybik z przecinkiem a nie liczba całkowita (mi podaje calkowita)


_____________________________________________
Pozdrawiam
  (o) Igor Dirbach

05-05-2004 23:49
Pokaż profil szakal  Wyślij email do szakal   Odwiedź stronę szakal       5314012
bisiek




Typ: neutral
Postów: 487
Zarejestrowany: Jul 2003

To znaczy że zmienna do której jest wpisywany wynik może mieć tylko wartość całkowitą (np long, integer, byte), zmień ją na taką która jest zmiennoprzecinkowa (double, currency).


_____________________________________________
www.mob.abc.pl - moja strona o VB

06-05-2004 15:24
Pokaż profil bisiek  Wyślij email do bisiek   Odwiedź stronę bisiek       3380672
andrey
Łódź



Typ: neutral
Postów: 295
Zarejestrowany: Mar 2003

Prosty przykładzik:

Private Sub Form_Load()
  Dim Liczby(10) As Single ' deklaruje tablice
    Liczby(0) = 1.6        ' nadaje jej jakieś wartości
    Liczby(1) = 1.8
    Liczby(2) = 1.4
    Liczby(3) = 1.6
    Liczby(4) = 1.8
    Liczby(5) = 1.4
    Liczby(6) = 1.6
    Liczby(7) = 1.8
    Liczby(8) = 1.4
    Liczby(9) = 1.6
    Liczby(10) = 1.8
  For i = 0 To UBound(Liczby, 1) 'zliczam liczbe elementow tablicy
    g = g + Liczby(i)            ' dodaje wartości poszczególnych elementów
  Next i
    Debug.Print g                ' wyświetlam wynik 17,8
End Sub


Tak jak mówił bisiek (post powyżej) uważj na deklaracje zmiennych

[Post edytowany dnia 06-05-2004 15:40 przez andrey]


_____________________________________________
http://www.carbondesign.pl/ - rowery poziome, trójkołówce, handbike-i, tuning, akcesoria

06-05-2004 15:40
Pokaż profil andrey  Wyślij email do andrey   Odwiedź stronę andrey       3078613
szakal



Typ: neutral
Postów: 3
Zarejestrowany: May 2004

THX wam wielkie...


_____________________________________________
Pozdrawiam
  (o) Igor Dirbach

06-05-2004 22:07
Pokaż profil szakal  Wyślij email do szakal   Odwiedź stronę szakal       5314012
Wszystkich odpowiedzi: 3 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1