Конференция VBStreets

**alleonid** » 14.07.2005 (Чт) 7:07

Я пишу небольшие расчетные программы.
Было бы удобно, если в поле Text можно было вводить не 5 а, к примеру, 20/4 или =20/4, или Sqr(25)...
Насколько я догадываюсь - text должна быть переменной "а" типа Variant, а затем преобразовываться в переменную "b" типа Double. Пробовал, но не получилось. Не могли бы вы привести текстовочку.

**Matew** » 14.07.2005 (Чт) 7:40

Недавно была тема называлась "Компилировать в exe" или типа того-там приведен пример, что аж можно функции вводить.

**alibek** » 14.07.2005 (Чт) 7:42

Ищи по слову "Eval".

**alleonid** » 14.07.2005 (Чт) 7:52

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

Private Sub Command1_Click()
Dim a As Variant
Dim b As Double

a = Text1.Text

'Какие команды вствить сюда?

Label1.Caption = b

End Sub

**uhm** » 14.07.2005 (Чт) 8:32

Иронии не было... вроде бы. Жмешь кнопочку "Поиск" вверху страницы, вводишь в поле поиска "Eval", читаешь найденные темы и, надеюсь, разбираешься сам.

Так более понятно? (вот здесь началась легкая ирония :roll:

)

**alleonid** » 14.07.2005 (Чт) 9:50

у меня чортова справка не фурычет.
Если не трудно, не крутите мне содержимое мошонки, а напишите пару строчек

**GSerg** » 14.07.2005 (Чт) 10:09

Чортова справка находится вверху этой страницы, и называется "Поиск"... И именно о ней всё это время...

**alleonid** » 14.07.2005 (Чт) 11:07

Eval

поиск по

www.vbstreets.ru

Не найдено ни одного документа, соответствующего запросу eval.

**alibek** » 14.07.2005 (Чт) 11:15

alleonid писал(а):Не найдено ни одного документа, соответствующего запросу eval.

Очень странно ты искал.
Я поискал и выдалась куча ссылок. Седьмая сверху -- именно то, что тебе нужно.

З.Ы. Поиск тут

З.Ы.Ы. Гайдар, видишь последствия рекламной кампании Гугля?

**RayShade** » 14.07.2005 (Чт) 11:17

Гуглевый посик пока не работает потому что сайт не до конца заиндексировали

**alleonid** » 14.07.2005 (Чт) 12:09

C eval так и не разобрался кстати. Видимо я очень тупой, нет опыта. (Хотя некоторые говорят, что просто логику VB понять трудно)
Нашел то что нужно по одной из ссылок - просто как раз то, что нужно, но без посторонних библиотек а с самостоятельными функциями.
И все же насчет Eval меня дикий интерес раздирает...

**alibek** » 14.07.2005 (Чт) 12:19

http://bbs.vbstreets.ru/viewtopic.php?t=4557
http://bbs.vbstreets.ru/viewtopic.php?p=19676#19676 ( http://bbs.vbstreets.ru/download.php?id=300 )

Неужели ничего из этого не подходит?

**alleonid** » 14.07.2005 (Чт) 12:29

Private Sub Form_Load()
MsgBox ScriptControl1.Eval("1+1*3+4*2")
End Sub

Ошибка Run Time Error 424

В чем дело?

**tyomitch** » 14.07.2005 (Чт) 15:06

alleonid, ScriptControl1-то на форму положил? ;-)

**Mikle** » 14.07.2005 (Чт) 16:15

alleonid
Вот тебе вариант без всяких доп. компонентов прямо на бейсике:

**alleonid** » 15.07.2005 (Пт) 3:46

Не могли бы вы объяснить как эту штуку с дополнительными функциями на форму положить? Откуда ее подключить можно?

**alleonid** » 15.07.2005 (Пт) 3:49

А что, в eval можно любые формулы вводить, не только + - / *

**Mikle** » 15.07.2005 (Пт) 10:57

alleonid

как эту штуку с дополнительными функциями на форму положить?

Если это о моей - на форму ничего класть не нужно. Просто подключи к проекту модуль и пользуйся функцией Calc. Кроме +, -, *, \, / есть еще скобки (многократные вложения), степени, логические операторы, ф-ции и т. д.

**--=GAMER=--** » 15.07.2005 (Пт) 11:15

Ответ к САБЖ'у
Text1.text = 2 - (-2) = 4
ПРи комбинации 2+ 2 получишь 22!!! :twisted:

Как говориться - LOL :wink:

**tyomitch** » 15.07.2005 (Пт) 11:21

alleonid писал(а):Не могли бы вы объяснить как эту штуку с дополнительными функциями на форму положить? Откуда ее подключить можно?

Project -> Components -> Microsoft Script Control

Можно вводить любые формулы в стандартном Бейсиковском виде.

**alleonid** » 15.07.2005 (Пт) 11:55

Спасибо Томич, а то все ,
, такие загадочные

**alleonid** » 18.07.2005 (Пн) 5:21

У меня вопрос по поводу контрола.
1) Во первых у меня его в Windows не оказалось, откуда он вообще берется.
2) Если я пишу программу с дополнительными библиотеками, а потом компилирую, то будет ли другой пользователь зависим от этих библиотек, то есть сможет ли exe шник работать без этих примочек?
Заранее спасибба.

**GAGArin** » 18.07.2005 (Пн) 5:43

--=GAMER=-- писал(а):Ответ к САБЖ'у
Text1.text = 2 - (-2) = 4
ПРи комбинации 2+ 2 получишь 22!!!
Как говориться - LOL

Извини не по теме ты высказался. Тут про другое, перечитай. Да и метод решения того чего тут вроде и не надо нехороший. :wink:

alleonid
Попробуй где нить поискать исходник калькулятора строковых выражений. Хотя вроде как пример один уже тут лежит...

Если пишешь программу зависимую от библиотек, то имеет смысл добавить их в проект. Стандартные VB'шные как я помню есть в ХР (если ошибусь просьба не пинать) А вот при использовании на 98 могут быть проблемы.

**alleonid** » 18.07.2005 (Пн) 6:27

Thanks
То есть, как я понял, библиотеками для создания полноценного чистого софта пользоваться не желательно.
То есть их содержимое так и остается во вне а не переваривается в процессе компиляции.
То бишь, следует вывод, что сами библиотеки надо засовывать в инсталляшку (что увеличивает программу в объеме) либо вообще забыть про них.

**tyomitch** » 18.07.2005 (Пн) 13:20

alleonid писал(а):У меня вопрос по поводу контрола.
1) Во первых у меня его в Windows не оказалось, откуда он вообще берется.

Кажется, ставится с VS. Не может быть, что его у тебя нет, если VB стоит.

alleonid писал(а):2) Если я пишу программу с дополнительными библиотеками, а потом компилирую, то будет ли другой пользователь зависим от этих библиотек, то есть сможет ли exe шник работать без этих примочек?
Заранее спасибба.

Есть способ подключения VBScript, не требующий дополнительных библиотек ни у тебя, ни у клиента: http://mastershome.net.ru/plotter.rar

Конференция VBStreets

Как текст 2+2 преобразовать в число 4?

Как текст 2+2 преобразовать в число 4?

поподробнее

у меня чортова справка не фурычет

Леонид

Спасибо

Кто сейчас на конференции