.. highlightlang:: us

.. index:: UniPlot.Call

.. _uniplot.call:

UniPlot.Call
============

.. us.tag  UniPlot.Call NOTREADYENGLISH Programming.ActiveX New300

The :ref:`UniPlot.Call` method can be used to invoke a UniPlot function from 
another program (ActiveX-Controllern).

.. function::  ret = UniPlot.Call(ssFuncName, arg1, ...)

.. us.return

**Return Value**

*ret* is the return value. The following data types are supported:If *ssFuncName*
returns a scalar (1-by-1 matrix), *ret* contains a value of type ``VT_R8``.

If *ssFuncName* returns a vector, (1-by-n matrix or n-by-1 matrix) *ret* returns
a 1-by-n matrix.

If *ssFuncName* returns a matrix (n-by-m matrix, n != 1 and m != 1), *ret*
contains a n-by-m matrix.

A string matrix is converted to ``VT_BSTR``. 

Other UniScript types (UniScript-Variant-Matrizen, Objects, complex numbers) are
not supported.

.. us.params

**Parameters**

.. uparam:: ssFuncName

   *ssFuncName* is the UniScript function name.

.. uparam:: arg1

   *arg1* is the first parameter passed to *ssFuncName*. The number of parameters
   is limited to the range 0 to 16. The following data types are supported:

   Scalar Elements:

   VT_UI1, VT_I2, VT_I4, VT_R4, VT_R8, VT_VARIANT, VT_BSTR, VT_DISPATCH.

   Vector (Array with dimension 1):

   VT_R8, VT_VARIANT, VT_BSTR.

.. us.example

**Example**

The following Excel program calls the UniPlot function :ref:`MessageBox`:

.. highlight:: none

::

   ssMessage$ = "This is a Test"
   Dim svStyles(2) As String
   svStyles(0) = "Test"
   svStyles(1) = "ICONSTOP"
   svStyles(2) = "YESNO"
   Set upApp = CreateObject("UniPlot.Application")
   YesNo = upApp.Call("MessageBox", ssMessage$, svStyles)

.. highlight:: us

.. seealso::
   :ref:`overview-programming`,
   :ref:`UniPlot.Visible`,
   :ref:`UniPlot.Caption`

:sub:`id-1856805`