Hjelp til et for loop script..

[Mr_Tiger]

Holder på og lære meg vb.net og har litt problemer med en for loop. Har en oppgave som ser slik ut:

Håper noen kan hjelpe meg litt.

Exercise

 

 

Put two textboxes on your form. The first box asks users to enter a start position for a For Loop; the second textbox asks user to enter an end position for the For loop. When a button is clicked, the programme will add up the numbers between the start position and the end position. Display the answer in a message box. You can use this For Loop code

 

For i = startNumber To endNumber

 

answer = answer + i

 

Next i

 

Get the startNumber and endNumber from the textboxes

 

 

 

Jeg har gjort følgende :

 

Public

 

 

Class Form1

 

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

　

 

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

 

Dim endNumber As Integer

Dim startNumber As Integer

Dim i As Integer

Dim answer As Integer

　

 

TextBox1.Text = startNumber

TextBox2.Text = endNumber

　

For i = startNumber To endNumber

 

answer = answer + i

 

MsgBox(answer)

 

Next i

 

End Sub

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

 

 

End Sub

 

End

 

 

Class

Endret 26. april 2012 av cmf_Tiger

[etse]

Textbox1.text er ikke en integer, det er en tekst-streng. Du må gjøre denne til integer for å kunne bruke den.

[Mr_Tiger]

Textbox1.text er ikke en integer, det er en tekst-streng. Du må gjøre denne til integer for å kunne bruke den.

Prøvde og sette inn

 

dim textbox1 as integer

dim textbox2 as integer

 

det hjalp ikke så mye:(

[etse]

Eksempel: Dim i As Integer = Convert.ToInt32(Val)

[Mr_Tiger]

Fikk det til.

[GeirGrusom]

Dim endNumber As Integer

Dim startNumber As Integer

Dim i As Integer

Dim answer As Integer

　

 

TextBox1.Text = startNumber

TextBox2.Text = endNumber

 

Feil vei. Du setter TextBox1.Text lik startNumber som du deklarerte rett over uten noen initialiseringsverdi. Det vil si at den endrer TextBox1.Text til å være standardverdien for Integer, som vil være 0.

Dette fører til en For løkke som går akkurat 0 ganger uansett hva du skriver i tekstboksene.