October 6, 2003
![sp_UserOfflineSmall](https://nordichardware.se/wp-content/sp-resources/forum-themes/reboot/images/darkpack/sp_UserOfflineSmall.png)
Hejsan! Jag har kodat en enkel sak till miniräknare. Alla knappar funkar fint, det är bara en funktion som jag inte fattar mig på. Den är uppbyggd av tre textrutor. I de 2 första skriver man i talen som man vill få adderade, subtraherade osv osv. Nu vill jag fixa en funktion som säger till om man delar Första talet med 0 så säger den ifrån!
Private Sub cmdDelat_Click()
txtText3.Text = Val(txtText1.Text) / Val(txtText2.Text)
If Val(txtText2.Text) = 0 Then
MsgBox "Division med noll ej tillåten!"
Else
txtText3.Text = Val(txtText1.Text) / Val(txtText2.Text)
End If
End Sub
Jag ser inga fel i den koden, varför funkar den inte?
EDIT: Tabbarna syns inte, men de finns där.
June 19, 2002
![sp_UserOfflineSmall](https://nordichardware.se/wp-content/sp-resources/forum-themes/reboot/images/darkpack/sp_UserOfflineSmall.png)
Problemet kanske är att du inte har heltal utan decimaltal (single/double), då kommer talet inte att vara exakt noll utan bara ungefär vilket är väldigt irriterande.
Testa att spara värdet på text2.text eller vad det var i en variabel som är ett heltal och kolla mot den variabeln och se om det funkar då.
October 6, 2003
![sp_UserOfflineSmall](https://nordichardware.se/wp-content/sp-resources/forum-themes/reboot/images/darkpack/sp_UserOfflineSmall.png)
[NH wrote: Noddan]Problemet kanske är att du inte har heltal utan decimaltal (single/double), då kommer talet inte att vara exakt noll utan bara ungefär vilket är väldigt irriterande.
Testa att spara värdet på text2.text eller vad det var i en variabel som är ett heltal och kolla mot den variabeln och se om det funkar då.
Japp, correcta mundo!
Men det funkar nu som sagt. Men tack ändå 🙂
1 Guest(s)
![sp_Information](https://nordichardware.se/wp-content/sp-resources/forum-themes/reboot/images/darkpack/sp_Information.png)