vb中窗体移动问题
一个工程中有一个主窗体,还有一个副窗体,在主窗体中调用显示副窗体并是副窗体在主窗体的右边,但在移动主窗体的过程中也希望副窗体的位置和主窗体的位置同时移动,如何才能办到?...
一个工程中有一个主窗体,还有一个副窗体,在主窗体中调用显示副窗体并是副窗体在主窗体的右边,但在移动主窗体的过程中也希望副窗体的位置和主窗体的位置同时移动,如何才能办到?
展开
3个回答
展开全部
具体的实现办法非常的多,一般这种窗口成为磁性窗口,一般会用vc
来实现,效果更好一点。
vb实现的代码:
Private Sub Command1_Click()
Form2.Show
Form2.Left = Form1.Left + Form1.Width + 1
Form2.Top = Form1.Top
End Sub
Private Sub Timer1_Timer() ‘timer1的interval属性是50
Form2.Left = Form1.Left + Form1.Width + 1
Form2.Top = Form1.Top
End Sub
来实现,效果更好一点。
vb实现的代码:
Private Sub Command1_Click()
Form2.Show
Form2.Left = Form1.Left + Form1.Width + 1
Form2.Top = Form1.Top
End Sub
Private Sub Timer1_Timer() ‘timer1的interval属性是50
Form2.Left = Form1.Left + Form1.Width + 1
Form2.Top = Form1.Top
End Sub
展开全部
在副窗体上用TIMER控件检测主窗体的位置,并追踪。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
/////////////////form1代码///////////
Private
Sub
Command1_Click()
Load
Form2
Form2.Show
End
Sub
////////////////form2代码////////////
Private
Sub
Command1_Click()
Load
Form3
Form3.Show
End
Sub
Private
Sub
Command2_Click()
Load
Form4
Form4.Show
End
Sub
Private
Sub
Command3_Click()
Load
Form5
Form5.Show
End
Sub
Private
Sub
Command1_Click()
Load
Form2
Form2.Show
End
Sub
////////////////form2代码////////////
Private
Sub
Command1_Click()
Load
Form3
Form3.Show
End
Sub
Private
Sub
Command2_Click()
Load
Form4
Form4.Show
End
Sub
Private
Sub
Command3_Click()
Load
Form5
Form5.Show
End
Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询