Question

在vb中按相应命令按钮时，标签文字”Hello“能分别向相应方向移动50缇

设计如图窗体，要求如下： 按相应命令按钮时，标签文字”Hello“能分别向相应方向移动50缇。

Answer 1

按图示，在窗体上放4个命令按钮和一个标签

代码：

Private Sub Command1_Click()
Label1.Top = Label1.Top - 50
End Sub

Private Sub Command2_Click()
Label1.Left = Label1.Left - 50
End Sub

Private Sub Command3_Click()
Label1.Left = Label1.Left + 50
End Sub

Private Sub Command4_Click()
Label1.Top = Label1.Top + 50
End Sub

Private Sub Form_Load()
Command1.Caption = "向上"
Command2.Caption = "向左"
Command3.Caption = "向右"
Command4.Caption = "向下"
Label1.Caption = "Hello"
End Sub