Just nu i M3-nätverket
Gå till innehåll

Räkna ihop textboxar?


webbaccess.net

Rekommendera Poster

webbaccess.net

Tjenare!

 

Håller på att försöka göra ett räkningsprogram men har stött på ett problem...

i VB 6.0 ska koden se ut såhär:

box1namn = Val(box1.Text)
box2namn = Val(box2.Text)
v = box1namn * box2namn
box3.Text = Str$(v)

 

Men så ser det inte ut i VB.NET...

 

någon som kan hjälpa mig med detta?

 

Länk till kommentar
Dela på andra webbplatser

Dim v, box1namn,box2namn As Integer
Try
box1namn=Convert.ToInt32(box1.Text)
box2namn=Convert.ToInt32(box2.Text)
v=box1namn*box2namn
Catch e As Exception
v=0
End Try
box3.Text=v.ToString()

 

[inlägget ändrat 2007-11-17 01:34:56 av Anjuna Moon]

Länk till kommentar
Dela på andra webbplatser

webbaccess.net

tackar för detta...

men det kvarstår ett problem:(

jag har koden:

        Dim v, antal1, apris1 As Integer
       Try
           antal1 = Convert.ToInt32(antal1)
           apris1 = Convert.ToInt32(apris1)
           v = antal1 * apris1
       Catch e As Exception
           v = 0
       End Try
       deltotal1.Text = v.ToString()
   End Sub

 

och får felet

Error 1 Variable 'e' hides a variable in an enclosing block.

 

 

Länk till kommentar
Dela på andra webbplatser

och får felet

Error 1 Variable 'e' hides a variable in an enclosing block.

Ok, jag gissar att du lagt koden i en händelsehanterare och dessa har ju variabeln e som argument, så ge catch-blocket en annan variabel:

Ex.

Catch ev As Exception

 

Länk till kommentar
Dela på andra webbplatser

webbaccess.net

får konstigt fel nu helt plötsligt...

 

Error 1 'text' is not a member of 'Integer'.

Error 2 'text' is not a member of 'Integer'.

 

hela koden för funktionen ser ut såhär:

[log]

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

Dim v, antal1, apris1 As Integer

Try

antal1 = Convert.ToInt32(antal1.text)

apris1 = Convert.ToInt32(apris1.text)

v = antal1 * apris1

Catch ev As Exception

v = 0

End Try

deltotal1.Text = v.ToString()

End Sub

[/log]

 

 

 

Länk till kommentar
Dela på andra webbplatser

webbaccess.net

tackar för detta!

 

Har byggt lite på koden nu, och har stött på ett problem igen.

 

har kodsnutten:

u = deltotal1 + deltotal2 + deltotal3 + deltotal4 + deltotal5

 

och får felet:

Error 1 Operator '+' is not defined for types 'System.Windows.Forms.TextBox' and 'System.Windows.Forms.TextBox'.

 

vad kan detta vara?

 

 

Länk till kommentar
Dela på andra webbplatser

Jag vill inte låta elak, men Net är en sådan vitt skild miljö från den du är van vid i gamla VB6 att du nog måste ta och plugga lite innan du fortsätter. Annars kommer du spendera större delen av din tid på att just ställa dessa frågor som är väldigt grundläggande i Net. Så för din egen tids skull så behöver du förstå skillnaden, den är inte bara semantisk utan helt annorlunda.

 

Länk till kommentar
Dela på andra webbplatser

Arkiverat

Det här ämnet är nu arkiverat och är stängt för ytterligare svar.

×
×
  • Skapa nytt...