[Visual Basic 6] Prosty kalkulator

0

No więc chce zrobić prosty kalkulator w vb6. Ustawiłem na formie przyciski od 1 do 0 i znaki matematyczne, u góry dalem textboxa na, którym po kliknięciu na dany przycisk ma się wyświetlać ta liczba. I tutaj mam kilka problemów:

  • nie wiem jak zrobić, żeby po każdym kliknięciu np. na przycisk "1" na textboxie pojawiała się liczba 1 i po następnym kliknięciu następna czyli razem byłoby "11", u mnie wygląda kod tak:
Private Sub p1_Click()
menu.Text = 1
End Sub

wiem, że źle i tutaj właśnie nie wiem jak zrobić, żeby po każdym kliknięciu była dodana liczba odpowiadająca za wybrany przycisk

  • następna sprawa, chciałbym też zastąpić klikanie na przyciski normalnym pisaniem wyrażeń na klawiaturze, nie wiem jaki jest kod, żeby coś się stało po wciśnięciu klawisza "1" i tutaj dalej kod byłby kod do wyświetlenia liczby na "wyświetlaczu" kalkulatora

po uzyskaniu odpowiedzi chyba dalej sobie poradzę, ale w razie problemów będę pisać

0

po prostu zrób tak:

Private Sub p1_Click()
   menu.Text =  menu.Text  & "1"
End Sub

Co do wpisywania z klawiatury to można tak:

Private Sub form_keypressed(keyascii as integer)
    Select Case keyascii
        Case 49
         p1_Click
    end select
end sub

Kody ASCII znajdziesz np. tutaj
Nie zapomnij jednak ustawić własciwości formularza "keypreview" na True

1 użytkowników online, w tym zalogowanych: 0, gości: 1