2015-12-28 46 views
0

我想移動控件並設置一個新的大小。位置和寬度和高度在一起去

在VB6我可以說:

_Browser.Move(uLeft, uTop, uWidth, uHeight) 

現在用VB.NET我只能找到這個解決方案:

_Browser.Location = New Point(uLeft, uTop) 
    _Browser.Width = uWidth 
    _Browser.Height = uHeight 

我想問一下,如果有,讓我設置的方法一個語句中的位置和寬度和高度。

謝謝!

回答

1

我不認爲這是對於一個內置的功能,但它很容易編寫自己的擴展它:

Public Module Extensions 
    <System.Runtime.CompilerServices.Extension()> _ 
    Public Sub Move(ByRef Ctrl As Control, ByVal X As Integer, ByVal Y As Integer, ByVal Width As Integer, ByVal Height As Integer) 
     Ctrl.Location = New Point(X, Y) 
     Ctrl.Size = New Size(Width, Height) 
    End Sub 
End Module 

現在,你應該能夠做到:

_Browser.Move(uLeft, uTop, uWidth, uHeight) 

瞭解更多關於擴展方法:https://msdn.microsoft.com/en-us/library/bb384936.aspx

+0

我已經創建了一個用戶控件,但它不承認我的新「移動」的延伸。我是否必須做任何特別的事情才能使它成爲一個用戶控件? – AntonioC

+1

@ user19127:將Sub與擴展標籤一起復制,並將Ctrl Ctrl Control更改爲Ctrl Ctrl UserControl(放置在同一個模塊中)。 –

+0

我這樣做了,但它反正無法工作。當我有時間時,我會進行更多的調查。謝謝。 – AntonioC