Forum studentów Informatyki Zaocznej na Uniwersytecie Opolskim
- Nie jesteś zalogowany.
- Polecamy: Sport i rekreacja
#1 2008-10-14 21:16:11
- katarzyna6226
Użytkownik
7072425
- Skąd: Opole
- Zarejestrowany: 2008-10-12
- Posty: 32
- Punktów : 0
odsetki
program do obliczania odsetek z Kursu VB (od ciemki) coś mi nie wychodzi, w linijce For i = i To lata, podkreślone jest drugie i, zamieniłam na zero, kompiluje się, ale nic nie liczy, może ktoś byłby w stanie mi podpowiedzieć co tam jest źle:)
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim kapital As Single
Dim lata As Integer
Dim oprocentowanie As Single
kapital = poleKwota.Text
lata = poleOkresLokaty.Text
oprocentowanie = poleOprocentowanie.Text
Dim odsetki As Single
Dim suma_odsetek As Single
For i = i To lata
odsetki = kapital * oprocentowanie / 100
suma_odsetek = suma_odsetek + odsetki
kapital = kapital + odsetki
Next i
End Sub
Offline
#3 2008-10-14 21:40:09
- katarzyna6226
Użytkownik
- Skąd: Opole
- Zarejestrowany: 2008-10-12
- Posty: 32
- Punktów : 0
Re: odsetki
"For zmienna = wartość początkowa To wartość końcowa
Instrukcje
Next zmienna
For, To i Next to instrukcje oznaczające pętlę. Cały zaś zapis oznacza: Przypisz zmiennej wartość
początkową, a następnie wykonuj instrukcje tak długo, aż zmienna osiągnie wartość końcową. Po każdym wykonaniu
instrukcji zwiększaj wartość zmiennej o jeden."
to jest cytat z tego kursu o którym wspominałam, robiłam już te "pętle" z0,1 i 2 tam to wychodziło tu nie
Offline
#4 2008-10-15 08:50:16
Re: odsetki
Nie wiem jak Wasz gość, ale Cyprian się denerwuje jak się wykorzystuje rzeczy o które nie prosił. Chodzi o pętle - jeżeli nie było w poleceniu wykorzystaj pętle, to mamy jej nie wykorzystywać. Pamiętacie 1 zajęcia jak ktoś zamiast użyć u nas CInt zadeklarował wcześniej dim cośtam = cośtam I gość dał wyraźnie do zrozumienia, że to nie jest zgodne z poleceniem.
Chyba się przeniosę do drugiej grupy
Offline
#5 2008-10-15 11:41:19
Re: odsetki
dokladnie nasz facio sie strasznie spina jak ktos robi wiecej niz jest napisane w poleceniu zadania, wiec my robimy to najprosciej jak sie da bez zadnych dodatkow i udziwnien! i on ma na imie Krystian a nie cypriam
Offline
#6 2008-10-15 12:36:00
- katarzyna6226
Użytkownik
- Skąd: Opole
- Zarejestrowany: 2008-10-12
- Posty: 32
- Punktów : 0
Re: odsetki
ja wiem że to jest trochę do przodu, ale chciałam sobie potrenować z tego kursu od ciemki, i wyszło chyba że tam jest jakiś błąd a konkretnie chodzi o to drugie i, może ktoś kto już programował w VB podpowie mi w czy jest problem
pzd
Kaśka
Offline
#7 2008-10-15 13:31:39
Re: odsetki
Public Class Form1
Dim suma As Integer
Dim procent As Integer
Dim czas As Integer
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
suma = TextBox1.Text
procent = TextBox2.Text
czas = TextBox3.Text
Label1.Text = (suma + (suma * (procent / 100))) / czas
End Sub
End Class
Offline
#8 2008-10-16 09:27:29
Re: odsetki
yogi napisał:
Public Class Form1
Dim suma As Integer
Dim procent As Integer
Dim czas As Integer
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
suma = TextBox1.Text
procent = TextBox2.Text
czas = TextBox3.Text
Label1.Text = (suma + (suma * (procent / 100))) / czas
End Sub
End Class
no i to jest the best option
Offline
#9 2008-10-18 10:54:02
Re: odsetki
yogi, najprościej i bardzo przejrzyście. Łatwiej sie tego zrobić nie da. A pętli faktycznie nie ma co przy nim wprowadzać. Oburzy się jak o durne zmienne... A przecież każdy robi, jak potrafi, no nie?
Pozdrawiam.
Offline
Stopka forum
Powered by PunBB
© Copyright 2002–2008 PunBB
Polityka cookies - Wersja Lo-Fi