Как сныкать глобальные функции в приложении ActiveX EXE/DLL от клиентского приложения - VB

Узнай цену своей работы

Формулировка задачи:

Товарищи! Как можно в ActiveX EXE/DLL в классе спрятать глобальные переменные/функции от глаз клиента.
К примеру функция в ActiveX EXE'шном классе:

она нужна как Public для использования внутри проекта для вызова например из другого класса, но VB еще ее делает как интерфейсную и клиент этого компонента тоже ее видит.
А нужно чтобы она была общей только внутри компонента и не видна клиенту. Как это можно сделать???

Решение задачи: «Как сныкать глобальные функции в приложении ActiveX EXE/DLL от клиентского приложения»

textual
Листинг программы
<font color="darkblue"><i>' начало класса XYZ</i></font>
<font color="darkblue"><i>'...</i></font>
<font color="blue">Private</font> objABC <font color="blue">As</font> ABC
....
<font color="blue">Public</font> <font color="blue">Property</font> <font color="blue">Get</font> takeABC() <font color="blue">As</font> ABC               <font color="darkblue"><i>'  получение объекта ABC</i></font>
    <font color="blue">Set</font> takeABC = objABC    <font color="darkblue"><i>'  возвращаем ссылку</i></font>
<font color="blue">End</font> <font color="blue">Property</font>
<font color="darkblue"><i>'....</i></font>
<font color="darkblue"><i>' конец класса XYZ</i></font>

<font color="darkblue"><i>' начало класса XXX [в одном проекте с XYZ]</i></font>
<font color="darkblue"><i>'...</i></font>
     <font color="blue">Dim</font> test <font color="blue">As</font> XYZ
     test = <font color="blue">New</font> XYZ
     <font color="blue">Dim</font> obj <font color="blue">As</font> ABC
     obj = XYZ.takeABC()           <font color="darkblue"><i>' ERROR не может вернуть ссылку на Private objABC</i></font>
<font color="darkblue"><i>'...</i></font>
<font color="darkblue"><i>' конец класса XXX</i></font>

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

5   голосов , оценка 3.8 из 5
Похожие ответы