Как програмно поменять положение (приналдежность) обьекта(контрола)? - VB

Формулировка задачи:

Уважаемые Спецы. У меня такой вопрос. Есть форма с двумя PictureBox например Picture1 и Picture2 В Picture1 размещена кнопка command1 (именно нарисована на Picture1, при ее перетягивании она не переходит на форму а как бы "подлазит" под нее). Нужно програмно переместить ее на Picture2 (на форму) например по ее нажатию. Каким образом возможно реалировать? Зараннее благодарен.

Код к задаче: «Как програмно поменять положение (приналдежность) обьекта(контрола)? - VB»

textual
Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long
 
Private Sub Form_Load()
    SetParent Command1.hWnd, Picture2.hWnd
End Sub

15   голосов, оценка 4.000 из 5


СОХРАНИТЬ ССЫЛКУ