Найти сумму произведений цифр целой и дробной частей. Visual Basic 2008 Express Edition

[Xorigan]

Так я исправил свою ошибку? number = Val(TextBox1.Text) ?

[Serge_Bliznykov]

Точность, в данном случае задаётся при вводе числа с клавиатуры. Обратите внимание на то, что я, в своём коде, сразу ухожу от вещественных типов и, в дальнейшем, работаю с 2мя целыми числами.

почему не работать на любой стадии (кроме суммирования цифр, разумеется) исключительно со строкой?! ввели строку в TextBox1.Text - взяли текст, обрезали пробелы слева/справа, нашли позицию десятичного разделителя, получили две подстроки и поехали - цикл по символам строки - с суммированием кодов. Всего и нужно, от кода символа код нуля отнимать...

впрочем, раз

Работает!

, то и ладненько.

[Streletz]

to Xorigan

Сообщение от Xorigan

Так я исправил свою ошибку, number = Val(TextBox1.Text) ?

Не знаю, как насчёт Ваших ошибок. Но, то, что я оставил? Вы пока даже не нашли. Я специально оставил малозаметную ошибку, о чём честно предупредил. Цель этого я изложил в самом начале.

Сообщение от Xorigan

Просто сделаю

Просто не получится.
При Вашем подходе, поиск может затянуться очень надолго.
Поэтому, так уж и быть дам Вам подсказку. Посмотрите внимательно на код. Всегда ли он будет работать? Помимо самой программы есть ещё ОС? в которой она работает. Что в работоспособности кода зависит от её текущих настроек?
P.S. Без обид. С учётом того, что я Вам практически сдал заложенную ошибку, говоря кратко и образно, "Ваш результат не засчитывается". По этой же причине,давать другие подсказки считаю нецелесообразным. Всё уже на поверхности.
to Serge_Bliznykov

Сообщение от Serge_Bliznykov

с суммированием кодов

Не прокатит. В данной задаче, необходимо суммировать именно числовые значения цифр, а не коды символов.

[Serge_Bliznykov]

Не прокатит. В данной задаче, необходимо суммировать именно числовые значения цифр, а не коды символов.

издеваетесь?! по секрету расскажу - если взять символ в диапазоне '0'..'9' и от него отнять код символа '0' - то Вы получите значение цифры.

рекомендую ознакомиться со следующим кодом (правда, она на C#, но это не принципиально...)

            Console.Write("Enter number : ");
            String s = Console.ReadLine();
            int sumDigit = 0;
            foreach (Char ch in s)
            {
                if ("0123456789".Contains(ch)) {
                  Console.WriteLine("Символ {0}, значение цифры = {1}", ch, Convert.ToInt16(ch) - Convert.ToInt16('0'));
                  sumDigit += Convert.ToInt16(ch) - Convert.ToInt16('0');
                }
            }
            Console.WriteLine("Сумма цифр введённой строки = {0}\n ", sumDigit);
            Console.WriteLine("\n Press any key to exit...");
            Console.ReadKey();

если в данный код добавить проверку символа на соответствие десятичному разделителю и подсчитать две суммы - до разделителя и после него - получится как раз то, что запрашивается в задании!


p.s. впрочем, может ошибочно сложится впечатление, что я с Вами о чём-то спорю или даже пытаюсь Вас чему-то научить! я думаю, что это не так, Вы и так всё это знаете.
Посему я не вижу перспектив дальнейшего обсуждения нами данного вопроса. Понимаете меня?..

[Xorigan]

Что за умники тут собрались? Я уже написал, что
number = Val(TextBox1.Text), где Val преобразовывает сторОковое значение в числовое.

[Streletz]

to Serge_Bliznykov

Сообщение от Serge_Bliznykov

издеваетесь?!

Даже в мыслях не было!

Сообщение от Serge_Bliznykov

по секрету расскажу - если взять символ в диапазоне '0'..'9' и от него отнять код символа '0' - то Вы получите значение цифры.

В завершение обсуждения, также по секрету могу сказать, что значение цифры можно получить прямым преобразованием в целое число.
Правда, в C#, с его строгой типизацией, для этого требуется дополнительное "ручное" приведение к string

int a = int.Parse(ch.ToString());

Поэтому, в C#, возможно, есть смысл в манипуляциях с кодами.
Но, в Visual Basic.NET, вследствие особенностей языка, выполнить такое преобразование гораздо проще.

Сообщение от Serge_Bliznykov

Посему я не вижу перспектив дальнейшего обсуждения нами данного вопроса. Понимаете меня?..

Понимаю. И со своей стороны, этим постом также завершаю обсуждение этого вопроса и искренне надеюсь на понимание.
to Xorigan

Сообщение от Xorigan

Val преобразовывает сторОковое значение в числовое.

Это прекрасно. Только, как я уже писал выше, ошибка не в этом. Чтобы наш диалог с коллегой Вас понапрасну не смущал, скажу прямо. В нём эта ошибка не обсуждалась. К сожалению, судя по Вашим постам, за всё время нашего с Вами общения Вы так и не разобрались в работе кода. Если, конечно, хотели разобраться.
В прочем, уговаривать Вас в нём разбираться я не стану. Простите, я не хочу Вас обидеть, но просто, в конце концов, это нужно Вам.