powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / вычисления при помощи msscript
11 сообщений из 11, страница 1 из 1
вычисления при помощи msscript
    #37635812
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вопрос скорее математический, но всё же...
Код: vbnet
1.
2.
3.
4.
5.
6.
Private Sub Command1_Click()
Dim myScriptContol As MSScriptControl.ScriptControl
  Set myScriptContol = New MSScriptControl.ScriptControl
  myScriptContol.Language = "vbscript"
Text1.Text = myScriptContol.Eval(Text1.Text)
End Sub


если ввести "3^2" выдаёт, как и положено, "9" (3 2 =9)
но "2*2*10^23" выдаёт "4E+23" . муть какая-то. очень неудобно записано. результат должен быть "4*10^23"
что за "Е" и как записать в привычном виде?
...
Рейтинг: 0 / 0
вычисления при помощи msscript
    #37635822
timtim
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
BelowZero
Код: vbnet
1.
2.
3.
4.
5.
6.
Private Sub Command1_Click()
Dim myScriptContol As MSScriptControl.ScriptControl
  Set myScriptContol = New MSScriptControl.ScriptControl
  myScriptContol.Language = "vbscript"
Text1.Text = myScriptContol.Eval(Text1.Text)
End Sub


Форумом ошибся походу Ты.
Что за манера постить код не соответствующий ветки форума?
...
Рейтинг: 0 / 0
вычисления при помощи msscript
    #37635843
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
timtimBelowZero
Код: vbnet
1.
2.
3.
4.
5.
6.
Private Sub Command1_Click()
Dim myScriptContol As MSScriptControl.ScriptControl
  Set myScriptContol = New MSScriptControl.ScriptControl
  myScriptContol.Language = "vbscript"
Text1.Text = myScriptContol.Eval(Text1.Text)
End Sub


Форумом ошибся походу Ты.
Что за манера постить код не соответствующий ветки форума? BelowZeroвопрос скорее математический, но всё же... а вот код как раз соответствующий. vb6. скрипт для решения примеров. можно написать такую функцию самому, но и этот скрипт неплохо справляется. только запись степени "4E+23" совсем не нравится...
...
Рейтинг: 0 / 0
вычисления при помощи msscript
    #37635851
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
BelowZeroно "2*2*10^23" выдаёт "4E+23" . муть какая-то. очень неудобно записано. результат должен быть "4*10^23"
что за "Е" и как записать в привычном виде?Если ты не знаешь элементарной математики куда ты лезешь к клавиатуре?
...
Рейтинг: 0 / 0
вычисления при помощи msscript
    #37635862
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
White OwlBelowZeroно "2*2*10^23" выдаёт "4E+23" . муть какая-то. очень неудобно записано. результат должен быть "4*10^23"
что за "Е" и как записать в привычном виде?Если ты не знаешь элементарной математики куда ты лезешь к клавиатуре? "3 2 " - стандартная математика. "3^2" - усложнённая для восприятия. сейчас моя прога решает все задачи в таком виде, скоро всё переведу в стандарты математики. "4E+23" - вообще ни в какие ворота. рядовой пользователь тупо не поймёт(если я сам пока не догоняю). надо будет разобраться, что означают буквы в записи степеней и дробей, тогда смогу визуально переводить записи сразу после отработки msscript
...
Рейтинг: 0 / 0
вычисления при помощи msscript
    #37635879
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
почитал... про чтепени.. можно, наверно, так
Код: vbnet
1.
2.
scripTik = Replace(scripTik, "E+", "*10^")
scripTik = Replace(scripTik, "E-", "*10^-")  
...
Рейтинг: 0 / 0
вычисления при помощи msscript
    #37635905
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
да, проверил - получилось норм. появилось только 2 небольших неудобства:
1) теперь придётся переименовывать комбинации "E-" и "Е+" до скрипта и возвращать после, чтобы скрипт не зацепил физические величины.
2)
Код: vbnet
1.
Round(myScriptContol.Eval(scripTik), 4)

теперь не работает(верней, работает не так, как хотелось бы), величина не округляется до 4 цифр после запятой. т.е. 1,11239531525236*10^23 должно округляться до 1,1124*10^23
...
Рейтинг: 0 / 0
вычисления при помощи msscript
    #37636049
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
BelowZero"4E+23" - вообще ни в какие ворота. рядовой пользователь тупо не поймётСрочно, СРОЧНО пиши жалобу в микрософт! Как они могут так обращаться со своими пользователями?
...
Рейтинг: 0 / 0
вычисления при помощи msscript
    #37636058
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
BelowZeroпочитал...
ого, кто-то умер, что Белов соизволил самостоятельно что-то почитать
...
Рейтинг: 0 / 0
вычисления при помощи msscript
    #37636314
Фотография alex77755
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторзапись степени "4E+23" совсем не нравится.
А мне не нравится, что весь мир до сих пор пользуется римскими и арабскими цифрами!!
И что существует несколько стандартов написания цифр.
Флаг тебе в руки!!! Придумай своё правило и убеди весь мир, что выражение, которое нравится тебе, является более правильным и с этого момента все забудут все правила и будут пользоваться правилом имени тебя!!!
...
Рейтинг: 0 / 0
вычисления при помощи msscript
    #37637957
Дмит
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Блин, а как я радовался, когда в своё время купил калькулятор,
где не было восьмиразрядного 0.0000003 а уже нормальное 3.1415927Е-7 :)
...
Рейтинг: 0 / 0
11 сообщений из 11, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / вычисления при помощи msscript
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]