Dim lab1 As WinForm.Label = e.Form.Controls("Label1")
If lab1.height + lab1.Top = 0 Then
lab1.Top = e.Form.height
Else
lab1.Top = lab1.Top -4
End If
谢谢了!此主题相关图片如下:附件1.png此主题相关图片如下:附件2.png