Avatar billede medard99 Nybegynder
30. november 2007 - 21:26 Der er 3 kommentarer

Plus knap i lommeregner

Hej

sidder og bikser med at lave en lommeregner men har problemer med at få knapperne +, -, / og * samt = til at virke:D burde ikke være noget problem for mig at få de andre til at virke hvis i bare svarer på + og = hehe:D det ville være fantastisk.. tak:D
Avatar billede medard99 Nybegynder
30. november 2007 - 21:30 #1
glemte lige at sige at har fået et 'hint' fra min lærer om at skrive Val(Displayfield.Text)
Avatar billede medard99 Nybegynder
01. december 2007 - 11:13 #2
har forresten lavet det hele i visual basic i excel. og min forløbelige kode ser sådan her ud:

Private Sub CommandButtonC_Click()
displayfield.Text = ""
End Sub

Private Sub label0_Click()
displayfield.Text = displayfield.Text & "0"

End Sub

Private Sub Label1_Click()
displayfield.Text = displayfield.Text & "1"
End Sub

Private Sub Label2_Click()
displayfield.Text = displayfield.Text & "2"
End Sub

Private Sub Label3_Click()
displayfield.Text = displayfield.Text & "3"
End Sub

Private Sub Label4_Click()
displayfield.Text = displayfield.Text & "4"
End Sub

Private Sub Label5_Click()
displayfield.Text = displayfield.Text & "5"
End Sub

Private Sub Label6_Click()
displayfield.Text = displayfield.Text & "6"
End Sub

Private Sub Label7_Click()
displayfield.Text = displayfield.Text & "7"
End Sub

Private Sub Label8_Click()
displayfield.Text = displayfield.Text & "8"
End Sub

Private Sub Label9_Click()
displayfield.Text = displayfield.Text & "9"
End Sub

Private Sub Labelkomma_Click()
displayfield.Text = displayfield.Text & "."
End Sub

og jeg mangler så til følgende:


Private Sub Labelligmed_Click() //// Knappen til =

End Sub

Private Sub CommandButton1_Click()  //// Knappen til +

End Sub

Private Sub CommandButton2_Click()  //// Knappen til *

End Sub

Private Sub CommandButton3_Click()  //// Knappen til -

End Sub

Private Sub CommandButton4_Click() //// Knappen til /

End Sub


Og som sagt i tidligere kommentar skal jeg bruge val(displayfield.text) til command knapperne (+,-,* og /)
Avatar billede abl2910 Nybegynder
16. december 2007 - 11:54 #3
Hej
Ved godt det er fra den 1-12
Men alligevel prøver jeg

Plus knap

tal1 = displayfield.Text
displayfield.Text = ""

Er lig med knap

displayfield.Text = Val(displayfield.Text) + Val(tal1)

dette er kun for plus med 2 tal, skal minus og de andre regne tegn med skal der under hver knap registreres om der er trykket på plus eller minus o.s.v.
Dette skal bruges i erlig knappen i en if løkke

god for nøjelse

abl2910
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester