例如:
  我有3个form,分别为form1,form2,form3
  form1,form2,form3都打开的情况下
  我使用form1.show但是form1不出现在最上层
 用什么办法是我装入的form出现在最上层?
谢谢各位了!!!

解决方案 »

  1.   

    我的问题是如何 在form.show后把该form调到最前端?
    而不是一直出现在最顶层!!
      

  2.   

    使用下面代码Global Const SWP_NOMOVE = &H2
    Global Const SWP_NOSIZE = &H1
    Global Const HWND_TOPMOST = -1
    dim lwinHwnd as long 
    '使显示信息窗体处于所有应用程序的顶层
    lwinHwnd = FindWindow(vbNullString, form1.Caption)         
    SetWindowPos lwinHwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE
      

  3.   

    Form1.show 1
    这个不可以
    因为我要求它要非模态显示