VB 窗体移动

2025-01-24 16:22:04
推荐回答(2个)
回答1:

移动什么呢,怎么移动。问题不清楚
如果是一张图片的话,左右就是picture1.left=picture1.left - int(text1.txt)
若果要渐渐移动就在加个时钟,用时钟一点的移动,直到达到text1的值

回答2:

Private Sub Command1_Click()
Form1.Left = Form1.Left + Val(Text1.Text)
End Sub

Private Sub Command2_Click()
Form1.Top = Form1.Top + Val(Text2.Text)
End Sub

Private Sub Command3_Click()
Form1.Left = Form1.Left + Val(Text1.Text)
Form1.Top = Form1.Top + Val(Text2.Text)
End Sub