Visual Basic i .NET pitanje

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Jel Visual Basic u stvari Visual Basic .NET ili su to dva razlicita jezika...

Gledam nesto po ovom tutorialu

[Link mogu videti samo ulogovani korisnici]

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Postoji razlika, a osnovna je da za Visual Basic 6.0 nije trebao .NET Framework. Znaci, osnovna razlika je sto je kod generisan sa .NET-om --> upravljiv (managed code) i zahteva CLR. Dalje, .NET ukljucuje i siri opseg klasa kolekcije, liste, ... Takodje, razne kontrole su promenile naziv ili su slicnog naziva (npr. OptionButton vs RadioButton), ali sve u svemu, trebalo bi da se snadjes.

Clanak o razlikama:
[Link mogu videti samo ulogovani korisnici]

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Poceo sam da ucim VB.Net malo, ide solidno, imam jedan problemcic pa ako neko moze da pomogne

Pravim kalkulator prvi i evo koda. Sve ide OK, kad odradim debugging i pokrene se program, npr. kad saberem 3 i 5 pojavi se 8 normalno. Onda odem na Clear button i obrise. Posle kad opet ocu da saberem neka dva broja opet, ono mi pamti onu trojku prvu i dodaje ovome. U cemu je problem evo koda. Inace kalkulator je krajnje jednostavan, 0-9, +, = i Clear dugme

Public Class Form1     Dim total1 As Integer     Dim total2 As Integer     Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load     End Sub     Private Sub btnZero_Click(sender As System.Object, e As System.EventArgs) Handles btnZero.Click         txtDisplay.Text = txtDisplay.Text & btnZero.Text     End Sub     Private Sub btnOne_Click(sender As System.Object, e As System.EventArgs) Handles btnOne.Click         txtDisplay.Text = txtDisplay.Text & btnOne.Text     End Sub     Private Sub btnTwo_Click(sender As System.Object, e As System.EventArgs) Handles btnTwo.Click         txtDisplay.Text = txtDisplay.Text & btnTwo.Text     End Sub     Private Sub btnThree_Click(sender As System.Object, e As System.EventArgs) Handles btnThree.Click         txtDisplay.Text = txtDisplay.Text & btnThree.Text     End Sub     Private Sub btnFour_Click(sender As System.Object, e As System.EventArgs) Handles btnFour.Click         txtDisplay.Text = txtDisplay.Text & btnFour.Text     End Sub     Private Sub btnFive_Click(sender As System.Object, e As System.EventArgs) Handles btnFive.Click         txtDisplay.Text = txtDisplay.Text & btnFive.Text     End Sub     Private Sub btnSix_Click(sender As System.Object, e As System.EventArgs) Handles btnSix.Click         txtDisplay.Text = txtDisplay.Text & btnSix.Text     End Sub     Private Sub btnSeven_Click(sender As System.Object, e As System.EventArgs) Handles btnSeven.Click         txtDisplay.Text = txtDisplay.Text & btnSeven.Text     End Sub     Private Sub btnEight_Click(sender As System.Object, e As System.EventArgs) Handles btnEight.Click         txtDisplay.Text = txtDisplay.Text & btnEight.Text     End Sub     Private Sub btnNine_Click(sender As System.Object, e As System.EventArgs) Handles btnNine.Click         txtDisplay.Text = txtDisplay.Text & btnNine.Text     End Sub     Private Sub cmdClear_Click(sender As System.Object, e As System.EventArgs) Handles cmdClear.Click         txtDisplay.Clear()     End Sub     Private Sub cmdPlus_Click(sender As System.Object, e As System.EventArgs) Handles cmdPlus.Click         total1 = total1 + Val(txtDisplay.Text)         txtDisplay.Clear()     End Sub     Private Sub cmdEquals_Click(sender As System.Object, e As System.EventArgs) Handles cmdEquals.Click         Dim total2 As Integer         total2 = total1 + Val(txtDisplay.Text)         txtDisplay.Text = total2         MsgBox(total2)     End Sub End Class

• 1Ovo se svidja korisniku: TwinHeadedEagle
  
  Registruj se da bi pohvalio/la poruku!

Probaj da na pocetku plus procedure pre svega stavis Total1=0 (da setujes varijablu na nulu).

cini mi se da kad ti sabere dva broja, vrednost varijable Total1 ti ostane 3, ti lepo resetujes txtDisplay.txt (da bude prazan za sl unos) posle sabiranja, ali vrednosta varijable Total1 ti ostane 3.

Pa sledeci put kad sabiras, i kazes Total1=Total1+txtDisplay.text on kaze 3=3+x

Probaj da prema logici programa resetujes varijablu Total1 na "pocetno" stanje.

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Probacu, hvala ti

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

@THE

Jesi li ti ovo pisao ili si prepisao?

Ne vidi se nigde resetovanje varijable total1. Ako se ne resetuje, pamtice vrednost.

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Ne razumem...

Radio sam po tutorialu, mada ga nisam najbolje razumeo (tu lekciju u kojoj se radi kalkulator). Ja sam pisao kod sam i onda sam samo kopirao kod ovde na forum...

Kakvo bi to ucenje bilo kad bih isao copy/paste

U cemu je problem u kodu?

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Koliko mogu da vidim, Clear vrednost totala ne postavlja na nulu.

Eksperimentisi malo sa tim.

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Probacu samo da dobijem inspiraciju, ako ne budem mogao da resim, trazim pomoc