Private Sub Form_Click() Label1.Left = Form1.Width - Label1.Width Label1.Top = 0End Sub
Private Sub Form_Click()Label1.Left = Form1.Width - Label1.WidthLabel1.Top = 0End Sub
移动标签.左,顶,即可.Label1.move Left, top,width,height