: Dim oSize As Size : Dim oLocation As Point : : 'To resize : oSize.Width = Button1.Width + 2 'Some width value : oSize.Height = Button1.Height + 2 'Some height value : Button1.Size = oSize : : 'To move : oLocation.X = Button1.Left + 2 'Some x co-ordinate : oLocation.Y = Button1.Height + 2 'Some y co-ordinate : Button1.Location = oLocation : : : Thank u.but what I mean is that I can use my mouse to change the size and location at run time.
Comments
Dim oLocation As Point
'To resize
oSize.Width = Button1.Width + 2 'Some width value
oSize.Height = Button1.Height + 2 'Some height value
Button1.Size = oSize
'To move
oLocation.X = Button1.Left + 2 'Some x co-ordinate
oLocation.Y = Button1.Height + 2 'Some y co-ordinate
Button1.Location = oLocation
: Dim oLocation As Point
:
: 'To resize
: oSize.Width = Button1.Width + 2 'Some width value
: oSize.Height = Button1.Height + 2 'Some height value
: Button1.Size = oSize
:
: 'To move
: oLocation.X = Button1.Left + 2 'Some x co-ordinate
: oLocation.Y = Button1.Height + 2 'Some y co-ordinate
: Button1.Location = oLocation
:
:
:
Thank u.but what I mean is that I can use my mouse to change the size and location at run time.