C++/CLI 封装参数是结构体的Windows API，在VB.NET中调用封装后的Api，传入结构体参数，详细例子说明getWindowsplement

假设我们要封装的 Windows API 是 GetWindowText 函数，该函数的定义如下：

int WINAPI GetWindowText(
  _In_  HWND   hWnd,
  _Out_ LPTSTR lpString,
  _In_  int    nMaxCount
);

其中，`HWND` 是窗口句柄，`LPTSTR` 是一个指向字符缓冲区的指针，`nMaxCount` 是缓冲区长度。我们需要将这三个参数封装为一个名为 `WindowInfo` 的结构体，并将其作为参数传递给 GetWindowText 函数。

下面是一个示例代码：

#include <Windows.h>
#include <vcclr.h>

namespace MyNamespace
{
    public value struct WindowInfo
    {
        HWND hWnd;
        System::String^ lpString;
        int nMaxCount;
    };

    public ref class MyApiWrapper
    {
    public:
        static int GetWindowText(WindowInfo windowInfo)
        {
            int result = 0;
            pin_ptr<const wchar_t> lpString = PtrToStringChars(windowInfo.lpString);
            if (lpString != nullptr)
            {
                wchar_t* buffer = new wchar_t[windowInfo.nMaxCount];
                if (buffer != nullptr)
                {
                    try
                    {
                        result = ::GetWindowText(windowInfo.hWnd, buffer, windowInfo.nMaxCount);
                        if (result > 0)
                        {
                            windowInfo.lpString = gcnew System::String(buffer, 0, result);
                        }
                    }
                    finally
                    {
                        delete[] buffer;
                    }
                }
            }
            return result;
        }
    };
}

在这个示例代码中，我们定义了一个名为 `WindowInfo` 的值类型结构体，其中包含三个字段：`hWnd`、`lpString` 和 `nMaxCount`。`lpString` 字段是一个 .NET 字符串类型，因此我们需要使用 `gcnew` 运算符为它分配内存。

在 `MyApiWrapper` 类中，我们定义了一个名为 `GetWindowText` 的静态方法，该方法接受一个 `WindowInfo` 参数，并返回 GetWindowText 函数的返回值。在方法内部，我们首先将 `lpString` 字段的内容转换为一个指向常量宽字符数组的指针，然后使用 `new` 运算符动态分配一个宽字符数组缓冲区，并调用 GetWindowText 函数将窗口文本复制到缓冲区中。如果 GetWindowText 函数返回值大于 0，则将缓冲区中的文本转换为 .NET 字符串类型，并将其赋值给 `lpString` 字段。

接下来，我们可以在 VB.NET 中调用这个封装后的 API，如下所示：

Imports MyNamespace

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim windowInfo As New WindowInfo()
        windowInfo.hWnd = Me.Handle
        windowInfo.lpString = New String(" "c, 256)
        windowInfo.nMaxCount = 256

        Dim result As Integer = MyApiWrapper.GetWindowText(windowInfo)
        If result > 0 Then
            MessageBox.Show(windowInfo.lpString)
        End If
    End Sub
End Class

在这个 VB.NET 代码中，我们创建了一个 `WindowInfo` 对象，并将窗口句柄、缓冲区和缓冲区长度赋值给它。然后，我们调用 `MyApiWrapper.GetWindowText` 方法，将 `WindowInfo` 对象作为参数传递给它，并获取 GetWindowText 函数的返回值。如果返回值大于 0，则显示窗口文本在一个消息框中。

需要注意的是，由于 C++/CLI 类库编译为托管代码，因此需要将其与 VB.NET 项目一起编译为 x86 或 AnyCPU 架构，以便在 64 位操作系统上正常运行。如果要在 64 位操作系统上运行，可以编译为 x64 架构。