vb.net在winform程序里嵌入一个web服务器

有vb.net做个桌面程序，在局域网里的电脑或者手机里的浏览器能看到桌面程序的画面而且能操作画面上的按钮以及桌面上的控件!

''' <summary>
''' WebApi服务类
''' </summary>
Public Class ClassHttpService
    Implements IDisposable
    ''' <summary>
    ''' 服务端口
    ''' </summary>
    ''' <returns></returns>
    Public Property Port As Integer
    ''' <summary>
    ''' 服务IP
    ''' </summary>
    ''' <returns></returns>
    Public Property IP As String
    ''' <summary>
    ''' 自托管服务对象
    ''' </summary>
    Private ReadOnly SelfHostServer As HttpSelfHostServer

    ''' <summary>
    ''' 初始化WebApi服务类
    ''' </summary>
    ''' <param name="IP">本机IP地址</param>
    ''' <param name="port">开放的端口</param>
    Public Sub New(IP As String, port As Integer)
        Me.Port = port
        Me.IP = IP
        Dim WebCongfig As HttpSelfHostConfiguration = New HttpSelfHostConfiguration($"http://{Me.IP}:{Me.Port}")
        WebCongfig.MapHttpAttributeRoutes()
        WebCongfig.Routes.MapHttpRoute("DefaultApi", "api/{controller}/{action}")
        SelfHostServer = New HttpSelfHostServer(WebCongfig)
    End Sub


    ''' <summary>
    ''' 启动WebApi服务
    ''' </summary>
    ''' <returns></returns>
    Public Function StartHttpServer() As Task
        Return SelfHostServer.OpenAsync()
    End Function

    ''' <summary>
    ''' 关闭WebApi服务
    ''' </summary>
    ''' <returns></returns>
    Public Function CloseHttpServer() As Task
        Return SelfHostServer.CloseAsync()
    End Function

    ''' <summary>
    ''' 释放对象
    ''' </summary>
    Public Sub Dispose() Implements IDisposable.Dispose
        SelfHostServer.Dispose()
    End Sub
End Class

提供参考实例：VB.NET WinForm自托管WebApi服务器：链接：https://cloud.tencent.com/developer/article/1839651
【博文讲解详细，值得借鉴】

用VB实现局域网屏幕监视
https://blog.csdn.net/weixin_34197488/article/details/94609871

web版的向日葵类远程软件？

可以到git上搜索对应案例demo