Символьный массив от Сервера автоматизации
HRESULT GetCharArray([in] BSTR varName, [in] BSTR Workspace,
[out, retval] BSTR *mlString)
GetCharArray(varname As String, workspace As String) As String
str = GetCharArray (h, 'varname', '
workspace
')
сохранил символьный массив в str = GetCharArray(h,'varname','workspace')
varname
от заданного workspace
сервера, присоединенного, чтобы обработать h
, и возвращает его в str
. Значениями для workspace
является base
или global
.
Этот пример использует Визуальный клиент Basic®.NET. Чтобы запуститься в продуктах, которые выполняют код VBA, смотрите Советы.
Создайте приложение Visual Basic. Используйте команду MsgBox
для потока управления между MATLAB® и приложением.
Dim Matlab As Object Dim S As String Matlab = CreateObject("matlab.application") MsgBox("In MATLAB, type" & vbCrLf _ & "str='new text';") Try S = Matlab.GetCharArray("str", "base") MsgBox("str = " & S) Catch ex As Exception MsgBox("You did not set 'str' in MATLAB") End Try
Откройте окно MATLAB, затем введите:
str='new text';
Нажать ОК. MsgBox
Visual Basic отображает то, что вы ввели в MATLAB.
Чтобы запустить примеры в Продуктах Office Microsoft®, которые выполняют код VBA, замените оператор:
MatLab = CreateObject("matlab.application")
с:
Set MatLab = CreateObject("matlab.application")
Если вам нужно больше информации, то обратитесь к своей документации по продукту VBA.