Cómo usar los atributos superior e izquierdo para mover "Me gusta aprender VB". Ingrese los datos en abscisas y ordenadas para mover.
Privado?Sub?Command1_Click() Label1.Top?=?Label1.Top?-?Val(Text3.Text) Text2.Text?=?Label1.Top
¿Fin? Sub
¿Privado?Sub?Command2_Click() Label1.Top?=?Label1.Top?Val(Text3.Text) Text2.Text?=?Label1.Top
¿Fin? Sub
Privado?Sub?Command3_Click() Label1.Left?=?Label1.Left?-?Val(Text3.Text) Text1.Text?=?Label1.Left
Fin ?Sub
Privado?Sub?Command4_Click() Label1.Left?=?Label1.Left? ?Val(Text3.Text) Text1.Text?=?Label1.Left
Fin ?Sub
Privado?Sub?Command5_Click() Label1.Top?=?Val(Text2.Text) Label1.Left?=?Val(Text1.Text)
Fin?Sub
Privado?Sub?Form_Load() Me.AutoRedraw?=?True Text1.Text?=?Label1.Left Text2.Text?=?Label1.Top Text3.TabIndex?=?0
Fin?Sub
Interfaz de diseño: