DS控件库在Combobox中嵌入远程桌面

佚名 6年前 (2019-04-16) 随笔 1059人围观抢沙发百度已收录

本示例演示DS开放式下拉列表控件中加入一个RDP远程桌面控件。

先在VS工具箱中添加COM控件Microsoft RDP Client Control，后面的Version版本可以适当高点。

SRE实战互联网时代守护先锋，助力企业售后服务体系运筹帷幄！一键直达领取阿里云限量特价优惠。

然后将RDP控件拖到窗体中，再拖出一个DS开放式下拉列表控件。

编写代码：

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        DS开放式下拉列表3.内置控件 = RDP
        DS开放式下拉列表3.DropDownWidth = 650
        DS开放式下拉列表3.DropDownHeight = 520
    End Sub

    Private Sub Form1_Shown(sender As Object, e As EventArgs) Handles Me.Shown
        With RDP
            .DesktopWidth = 640
            .DesktopHeight = 480
            .UserName = "Administrator"
            .Connect()
        End With
    End Sub

　　运行后，点击DS开放式下拉列表控件