本示例演示DS開放式下拉列表控制項中加入一個RDP遠程桌面控制項。 先在VS工具箱中添加COM控制項Microsoft RDP Client Control,後面的Version版本可以適當高點。 然後將RDP控制項拖到窗體中,再拖出一個DS開放式下拉列表控制項。 編寫代碼: 運行後,點擊DS開放式下拉列表控 ...
本示例演示DS開放式下拉列表控制項中加入一個RDP遠程桌面控制項。
先在VS工具箱中添加COM控制項Microsoft RDP Client Control,後面的Version版本可以適當高點。
然後將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開放式下拉列表控制項