Войти

Показать полную графическую версию : Калькулятор с одним textbox.....


ProgrammerPC
19-12-2009, 18:32
Доброго времени суток!!!)))Люди добрые,пожалуйста,кто может,помогите написать калькулятор на VB.NET с одним текстовым полем,примерно такой как в Windows )))Я уже написал калькулятор с 3-я текстовыми полями,но это ведь бред,хочется с одним.Я начинающий программер,так что если сможете объяснить,то немножко попроще)))))Мне пожалуйста хотя бы объясните сам механизм работы калькулятора с одним текстовым полем,а там я и сам уже буду думать)
Буду очень благодарен)))))
С уважением)))

ProgrammerPC
19-12-2009, 18:44
Я думал может надо сделать вот так:ввожу я например цифру 7 в текстовое поле,потом нажимаю например "+" и "7" присваивается переменной,потом ввожу например 9,потом "=" или "Enter" и после этого "9" присваивается другой переменной и плюсует "7" и "9".Но я не знаю как это осуществить(((((Может это и не правильно(((

lxa85
19-12-2009, 20:17
ProgrammerPC, ручку или в карандаш в руки и рисовать схемки!
И рисовать до тех пор, пока не будет ясно все варианты движения и идентификации этого самого единственного поля ввода.
Блок - схемы хороши для этих вещей. В них должны содержаться все события которые могут возникнуть (нажатия кнопок). Что есть, что нажато, и что должно получиться.
Схемы и структуры, структуры и схемы.
Запрограммировать - это пара пустяков, лишь бы знать что программировать и как это все должно изменяться во времени.

Успехов! :)

SerDesh
19-07-2010, 16:52
Всем драсте. Нужна помощь.
вот кусок кода:
Private Sub btn1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn1.Click
If tr = True Then Tablo.Text = "" : tr = False
Tablo.Text = Tablo.Text & "1"
End Sub

Private Sub btn2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn2.Click
If tr = True Then Tablo.Text = "" : tr = False
Tablo.Text = Tablo.Text & "2"
End Sub

и далее...

Private Sub Calculator_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
If e.KeyCode = Keys.NumPad1 Then

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
End If
End Sub

Хотелось бы чтобы при нажатии на клавишу "1" выполнялось событие "btn1_Click". Чем заменить знаки восклицания?

Delirium
20-07-2010, 01:22
Хотелось бы чтобы при нажатии на клавишу "1" выполнялось событие "btn1_Click". Чем заменить знаки восклицания? »

btn1_Click(sender, e)

SerDesh
20-07-2010, 08:24
Пасиба! Работает )))

Delirium
20-07-2010, 08:40
SerDesh, для спасибо есть кнопка "Полезное сообщение" :))




© OSzone.net 2001-2012