Question

在vb中我用toolbar做的一个工具栏，点击上面的按钮可以弹出窗体，可是不能切换？求助高手帮忙？

如上图所示 这是让两个窗体（form1和from2）弹出显示在MDIform上,按下“参数”form2显示。

如上图所示现在我想实现的是接着点击“参数”按钮，让form2显示到上面了，这样可以让他们来回互换，互不影响（不是删除其中一个哦，不用form.hide.只是相互覆盖，都在窗体上）应该怎么实现呢？下面是让他们显示的代码：

Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)Select Case Button.IndexCase 1Form1.Left = 0Form1.Top = 0Form1.Height = 9000Form1.Width = 15000Form1.ShowCase 2Form2.ShowForm2.Left = 0Form2.Top = 0Form2.Height = 9000Form2.Width = 15000

End Select

End Sub

望高手指点啊 肯定好评 在线等哦





Answer 1

Form1.Width = 15000
Form1.Show
中间加入form1.zorder

form2也类似，只是改为form2.zorder

Answer 2

在显示前，设置窗口前后位置就可以了：
form1.zorder=0
form1.show
....
form2.zorder=0
form2.show

追问

非常感谢你的回答，不用等于0的，你这个我一试 就提示说“缺少函数和变量”不过你也挺厉害的

追答

汗，打错了，多写个=

追问

没事 这个问题我问了两遍 你搜一下应该还有 答一下 分给你

Answer 3

case 1
...
Form2.Show
Form1.Show

case 2
Form1.Show
Form2.Show

追问

这个方法不可以的 这样一显示的话 两个窗体中必有一个窗体尺寸改变

追答

我的意思是说，你可以先显示一个，然后再显示另一个就达到了你要的效果，不是让你改变窗体尺寸

追问

不是的 ，这样的话一点按钮两个都会显示出来，由于这两个窗体设计时尺寸是一样的，程序为了满足都显示的要求，而不是一个覆盖了另一个，而是要把一个变小用以显示

追答

如果找不到别的方法，不妨试试这个，改变大小