Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 29.08.2013, 12:48   #1
uralshans
Пользователь
 
Регистрация: 26.12.2012
Сообщений: 66
По умолчанию Textbox1 + Textbox 2 Математичские знаки

Добрый день!
Подскажите как программно получилось сложение или вычитание (а также деление) "TextBox1 + Textbox2"
Пример: в TextBox1 вводим "100" в TextBox2 "50", жмем кнопку, в результате в TextBox3 получаем 150.. А не 10050.
Заранее спасибо!!
uralshans вне форума Ответить с цитированием
Старый 29.08.2013, 12:56   #2
VictorM
Старожил
 
Аватар для VictorM
 
Регистрация: 15.05.2008
Сообщений: 2,058
По умолчанию

У меня сделано так:
Код:
TextBox3 = Val(TextBox1.Value) + Val(TextBox2.Value)
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499

Последний раз редактировалось VictorM; 29.08.2013 в 13:33. Причина: Исправил свою ошибку, заменил Caption на Value
VictorM вне форума Ответить с цитированием
Старый 29.08.2013, 13:05   #3
uralshans
Пользователь
 
Регистрация: 26.12.2012
Сообщений: 66
По умолчанию

Спасибо!! Сделал..
Ругнулся на Caption; заменил Caption на Value и все заработало. СПАСИБО!!
uralshans вне форума Ответить с цитированием
Старый 29.08.2013, 13:11   #4
VictorM
Старожил
 
Аватар для VictorM
 
Регистрация: 15.05.2008
Сообщений: 2,058
По умолчанию

Цитата:
Ругнулся на Caption;
Совершенно верно, это ошибка.
Caption это для Label
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499
VictorM вне форума Ответить с цитированием
Старый 29.08.2013, 13:17   #5
uralshans
Пользователь
 
Регистрация: 26.12.2012
Сообщений: 66
По умолчанию Выражение с дисетичными (2 знака после запятой)

Так, складывает умножает делит..

Но если ввести значения вида 1,55 (с десятичными)
ТО уже выдает ошибку.
Какой код для понимания textbox дробной части?
uralshans вне форума Ответить с цитированием
Старый 29.08.2013, 13:30   #6
VictorM
Старожил
 
Аватар для VictorM
 
Регистрация: 15.05.2008
Сообщений: 2,058
По умолчанию

Цитата:
Какой код для понимания textbox дробной части?
CDbl поймет
Подробнее обо все этом вот ЗДЕСЬ можно почитать
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499

Последний раз редактировалось VictorM; 29.08.2013 в 13:35.
VictorM вне форума Ответить с цитированием
Старый 29.08.2013, 14:37   #7
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

еще есть Evaluate:
Код:
application.Evaluate("(6.0+7)^2")
- получите 169
а так
Код:
application.Evaluate("6.0+7^2")
- 55
разделитель целой и дробной части - ТОЧКА .
Evaluate много понимает из математики синусы, логарифмы, прочее
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 29.08.2013, 15:53   #8
uralshans
Пользователь
 
Регистрация: 26.12.2012
Сообщений: 66
По умолчанию

спасибо! справился таким образом:

Label5.Caption = CDbl(TextBox1.Value) + CDbl(Label4.Caption)
uralshans вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как разделить textbox1.text (с разделителями ;) по частям? Aqil_f Microsoft Office Excel 13 13.12.2017 18:03
Внести данные из Textbox Form2 в TextBox Form1 uralshans Microsoft Office Excel 1 07.01.2013 17:15
Путь файла в TextBox1 ProGec4 Windows Forms 1 19.05.2012 18:59
Проблема с textBox1 NoF[1]X Общие вопросы C/C++ 0 04.04.2010 16:09
сохранить книгу на диске С в папке название которое указывается в textBox1 ScOrpi Microsoft Office Excel 3 16.12.2007 17:52