Автор Тема: Помогите разобратся с инженерным калькулятором!  (Прочитано 1551 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн Deffi

  • Коллежский регистратор
  • *
  • Сообщений: 2
  • Репутация: 0
Проблема в том, что никак не могу разобратся как сделать так, чтоб работали кнопки памяти: MC, M+, MR. Выдает ошибку в строке: memo = memo + CDbl(txtResult.Text). Меняла на memo = memo + CDbl(Text3.Text) тоже не работает. Пожалуйсто укажите в чем ошибка или подкоректируйте код этих кнопок:

Dim memo As Double
Private Sub Command19_Click()     //кнопка М+
memo = memo + CDbl(Text3.Text)
End Sub
Private Sub Command21_Click()    //Кнопка MR
Text3.Text = CStr(memo)
End Sub
Private Sub Command20_Click()   //Кнопка MC
memo = 0
End Sub
« Последнее редактирование: °ЯаХЫм 11, 2009, 07:30:19 pm от Deffi »