Сложение

@desant13 · Регистрация: 04.02.2011

Студворк — интернет-сервис помощи студентам

Здравствуйте.
Как сложить 3.33 с 2.22 и получить 5.55... если я просто складываю "+" то выходит ошибка... если я использую "Val" то складывается, но получается "5" без ".55". Что нуно использовать чтоб получилось 5.55?

@Busine2009 · 04.02.2011, 21:25

desant13,
а что за ошибка?

@desant13 · 04.02.2011, 21:36 **[ТС]**

Ошибка не выскакивает, это я там намудрил но выходит 3.332.22 ... что меня как бы не устраивает

@Busine2009 · 04.02.2011, 21:45

desant13,
а какая среда программирования у вас?

@desant13 · 04.02.2011, 21:48 **[ТС]**

Microsoft Visual Basic 6.0, как бы эта часть форума как раз про VB6

@Busine2009 · 04.02.2011, 21:50

desant13,
есть ещё VB 10, там синтаксис другой.
Напишите тогда код ваш.

@desant13 · 04.02.2011, 21:56 **[ТС]**

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
Private Sub v1_Click()
itog1.Text = nd1.Text - cd1.Text
If itog1.Text <> 0 Then oplata1.Text = tarif1.Text * (nd1.Text - cd1.Text) Else oplata1.Text = tarif1.Text * rasxod1.Text
End Sub
Private Sub v2_Click()
itog2.Text = nd2.Text - cd2.Text
If itog2.Text <> 0 Then oplata2.Text = tarif2.Text * (nd2.Text - cd2.Text) Else oplata2.Text = tarif2.Text * rasxod2.Text
End Sub
 
Private Sub vivod_Click()
oplata0.Text = (oplata1.Text) + (oplata2.Text) 
End Sub

Да тут как бы все легко, да как то че то не получается

@Busine2009 · 04.02.2011, 22:06

desant13,
с помощью этого превратите текст в дробные числа: CSng.
Только я как-то в Excel перевёл с помощью CSng что-то и у меня данные неправильно отображались.

CSng - это встроенная функция VB.
Если у вас нет Справки в редакторе VB 6, а в интернете в MSDN вы не можете найти информации нужной, то откройте Microsoft Office Любую программу - перейдите в редактор кода VBA.
Далее: Help - Microsoft Visual Basic for Application Help - Visual Basic for Application Language Reference (Reference в данном случае переводится как Справка) - Visual Basic Language Reference - Functions - Conversation Functions.

@desant13 · 04.02.2011, 22:09 **[ТС]**

Оо. СПС.. получилось!

Новые блоги и статьи Все статьи Все блоги /
Перемещение выделенных строк ТЧ из одного документа в другой Maks 30.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .

@desant13 0 / 0 / 0 Регистрация: 04.02.2011 Сообщений: 18

	Сложение 04.02.2011, 16:44. Показов 3294. Ответов 8 Метки нет (Все метки) Здравствуйте. Как сложить 3.33 с 2.22 и получить 5.55... если я просто складываю "+" то выходит ошибка... если я использую "Val" то складывается, но получается "5" без ".55". Что нуно использовать чтоб получилось 5.55? 0

@Busine2009 2309 / 1541 / 115 Регистрация: 13.06.2009 Сообщений: 5,575
	04.02.2011, 21:25
	desant13, а что за ошибка? 0

@desant13 0 / 0 / 0 Регистрация: 04.02.2011 Сообщений: 18
	04.02.2011, 21:36 [ТС]
	Ошибка не выскакивает, это я там намудрил но выходит 3.332.22 ... что меня как бы не устраивает 0

@Busine2009 2309 / 1541 / 115 Регистрация: 13.06.2009 Сообщений: 5,575
	04.02.2011, 21:45
	desant13, а какая среда программирования у вас? 0

@desant13 0 / 0 / 0 Регистрация: 04.02.2011 Сообщений: 18
	04.02.2011, 21:48 [ТС]
	Microsoft Visual Basic 6.0, как бы эта часть форума как раз про VB6 0

@Busine2009 2309 / 1541 / 115 Регистрация: 13.06.2009 Сообщений: 5,575
	04.02.2011, 21:50
	desant13, есть ещё VB 10, там синтаксис другой. Напишите тогда код ваш. 0

@Busine2009 2309 / 1541 / 115 Регистрация: 13.06.2009 Сообщений: 5,575
	04.02.2011, 22:06
	desant13, с помощью этого превратите текст в дробные числа: CSng. Только я как-то в Excel перевёл с помощью CSng что-то и у меня данные неправильно отображались. CSng - это встроенная функция VB. Если у вас нет Справки в редакторе VB 6, а в интернете в MSDN вы не можете найти информации нужной, то откройте Microsoft Office Любую программу - перейдите в редактор кода VBA. Далее: Help - Microsoft Visual Basic for Application Help - Visual Basic for Application Language Reference (Reference в данном случае переводится как Справка) - Visual Basic Language Reference - Functions - Conversation Functions. 0

@desant13 0 / 0 / 0 Регистрация: 04.02.2011 Сообщений: 18
	04.02.2011, 22:09 [ТС]
	Оо. СПС.. получилось! 0

Опции темы