powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Использование solver32.dll в VB6
8 сообщений из 8, страница 1 из 1
Использование solver32.dll в VB6
    #36524005
Anarhist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Здравствуйте уважаемые специалисты, появилась необходимость интегрировать "поиск решения" из EXCEL в VB6. Реально ли это сделать? зарание спасибо.
...
Рейтинг: 0 / 0
Использование solver32.dll в VB6
    #36524018
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AnarhistЗдравствуйте уважаемые специалисты, появилась необходимость интегрировать "поиск решения" из EXCEL в VB6. Реально ли это сделать? зарание спасибо.

А воспользоваться Excel-ем как СОМ-объектом не подойдет?
...
Рейтинг: 0 / 0
Использование solver32.dll в VB6
    #36524822
Anarhist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Использование EXCEL как объект получается, а вот как туда именно поиск решения подключить никак не могу сообразить. Если не трудно подскажите в какую сторону двигаться.
В качестве сетки используется ms FlexGrid
...
Рейтинг: 0 / 0
Использование solver32.dll в VB6
    #36524837
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Запись макроса дает примерно такие команды:
Код: plaintext
1.
    SolverOk SetCell:="$A$1", MaxMinVal:= 3 , ValueOf:="3", ByChange:="$B$4"
    SolverSolve

Но как их выполнить через COM - не знаю, ObjectBrowser не находит их как методы чего-то...
Может быть создать шаблонный файл, в нем свой метод для солвера и вызывать этот метод через СОМ...
...
Рейтинг: 0 / 0
Использование solver32.dll в VB6
    #36524859
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AnarhistЗдравствуйте уважаемые специалисты, появилась необходимость интегрировать "поиск решения" из EXCEL в VB6. Реально ли это сделать? зарание спасибо.Нафига???
Самому сделать намного проще будет.

Там же все элементарно до ужаса: У тебя есть формула: y=f(x)
Задача найти такой x чтобы f(x) стало равной заданному y
Все что solver делает это берет x=0 , считает f(x) сравнивает результат с заданным, не совпадает? Увеличить x и посчитать еще раз. Значение f(x) приблизилось к искомому? Да - увеличить x еще раз, удалилось - уменьшить x . ... и повторять до посинения.
...
Рейтинг: 0 / 0
Использование solver32.dll в VB6
    #36524860
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
White Owl,

А если функция нелинейная?
Думаю, алгоритм там посложнее.

Впрочем, все зависит от задачи автора.
...
Рейтинг: 0 / 0
Использование solver32.dll в VB6
    #36524885
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.ProWhite Owl,

А если функция нелинейная?
Думаю, алгоритм там посложнее.

Впрочем, все зависит от задачи автора.А если функция нелинейная, то solver обломается и завершится с воплем что он не смог найти результат за -цать тысяч итераций.
И да, если есть некоторое представление о том какого типа функцию надо будет находить, то и алгоритм нахождения будет намного более качественной версией брутфорса или даже вообще не брутфорс.
А может даже можно будет сделать и функцию от двух-трех-...-многих переменных.
...
Рейтинг: 0 / 0
Использование solver32.dll в VB6
    #36524886
Anarhist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Я тоже макрос писал, однако он не работает в vb6. Видимо сначала библиореку надо правельно подключить, кроме того в процессе ещё участвует solver.xlam который как я понимаю выступает посредником...
Сам solver ооочень мощный алгоритм, а главное достоинство возможность выставлять ограничения
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Использование solver32.dll в VB6
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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