Tags:
visual-basic
hej
Jeg vil høre hvad jeg skal gør for at at læg to tal sammen
hvis man lægger 1+1 sammen skal det jo give 2 og ikke 11
Hilsen Rene
1 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 3 karma
Det handler om dine typer.
Dim a as Integer = 1
Dim b as Integer = 2
MsgBox(a+b)
Det vil give tre.
Dog vil:
Dim a as String = "1"
Dim b as String = "2"
MsgBox(a+b)
Give 12.
Du skal convertere dine string objekter til tal objekter før at de kan lægges sammen.
Du skal derfor bruge CDbl(string) for kommatal eller CInt(string) for hele tal, altså lad os sige to har to textboxes:
Dim a as Integer = CInt(TextBox1.Text)
Dim b as Integer = CInt(TextBox2.Text)
MsgBox(a+b)
Håber det hjælper