Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 30.05.2011, 17:44   #1
Maestro0222
 
Регистрация: 16.11.2009
Сообщений: 4
По умолчанию Вопрос о Процедурах

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


Public Function f(x)
f = 5 * x ^ 3 - 19 * x + 3
End Function
Function f1(x)
f1 = Exp(x) - x ^ 2
End Function

Procedure Fix(a,b as double,F as "Fuction")
................
................
F(A)*f(B)


f1 или F выбрать переключателем , отослать параметр в процедуру , и она будет использовать функцию в зависимости от выбраного optionButton

Последний раз редактировалось Maestro0222; 30.05.2011 в 17:46.
Maestro0222 вне форума Ответить с цитированием
Старый 30.05.2011, 19:21   #2
Aent
Форумчанин
 
Аватар для Aent
 
Регистрация: 17.07.2009
Сообщений: 519
По умолчанию

Maestro0222,
Передать функцию как параметр в VBA процедуру нельзя.
У вас 2 пути:
1) Перенести вычисление в точку выбора
Код:
Public Function F(x as double ,iSelector as integer)
   Select case iSelector
         Case 1
                F = 5 * x ^ 3 - 19 * x + 3
         Case 2
                F = Exp(x) - x ^ 2
   End select
end sub
2) Создать класс, включить в него требуемые функции и для экземпляра класса
использовать функцию CallByName. Получите что то типа:
Код:
    Fix(....,FName as string,...)
    ... = CallByName(MyClass,FName,vbGet,x)
Ключевое слово Procedure в VBA не используется. Предположу, что вы имели в виду Sub.

Последний раз редактировалось Aent; 30.05.2011 в 19:28.
Aent вне форума Ответить с цитированием
Старый 31.05.2011, 01:57   #3
Maestro0222
 
Регистрация: 16.11.2009
Сообщений: 4
Радость

Спасибо ))
Maestro0222 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вопрос о процедурах TaYgA Помощь студентам 3 15.09.2010 13:15
Записи в процедурах!!! eR- Помощь студентам 1 16.12.2009 14:49
Объекты в процедурах Altera Общие вопросы Delphi 10 07.03.2009 17:21
запутался в процедурах world12_tk Помощь студентам 6 03.03.2009 18:57
Материал о процедурах Jondeer Помощь студентам 18 04.12.2007 21:22