完整一些的代码：
Sub Command1_Click()
form2.show 1
End Sub
单击按钮时，窗体2出现，窗体1不可操作。本回答被提问者采纳
msgbox("No",4096,"Tips")
vb6.0 中如何使窗口总在最前,并且不能操作其它窗体。
form2.show 1 End Sub 单击按钮时，窗体2出现，窗体1不可操作。
vb6.0中的窗体如何设置最前?
'用于确定窗体显示形式的常数为 hwnd_topmst=-1 将窗体保持在最前面 hwnd_notopmost=-2 不将窗体宝石在最前面 'swap_nosize=&h1 窗体装入时不改变原有尺寸 swap_nomove=&h2 窗体装入时保持原窗体设计师在屏幕上的位置 Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ...
vb6.0窗体总是最前
SetWindowPos()，第二个参数用HWND_TOP或者HWND_TOPMOST，可以把窗口放到z序顶部。两个试一试，应该能解决你的问题
VB6.0窗口总在最前(如QQ那样)
' 将窗口置于列表顶部，并位于任何最顶部窗口的前面 Private Const SWP_NOSIZE& = &H1 ' 保持窗口大小 Private Const SWP_NOMOVE& = &H2 ' 保持窗口位置 Private Sub Form_Load()SetWindowPos Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE ' 将窗口设为总在最前 End Su...
vb6.0 窗口总在最前源码或者做法,详细且要解释,可以考虑多给分,...
0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE ' 取消窗口设为总在最前 这个有一个缺陷，在窗体最小化后就不执行了，所以保持窗口总在最前的话最好放在窗体重画事件里 Private Sub Form_Paint()SetWindowPos Me.hWnd, -1, 0, 0, 0, 0, 2 Or 1 ' 将窗口设为总在最前 End Sub ...
VB6.0窗体form1总在最前的代码怎么写
Sub Form_load()Dim retValue As Long '将窗体设置为处于所有窗口的顶层，注意在 VB 中运行时，可能不行，但编译成EXE后就可以了 retValue = SetWindowPos(Me.hwnd, HWND_TOPMOST, Me.CurrentX, Me.CurrentY, 300, 300, SWP_SHOWWINDOW)End Sub ...
VB6.0中怎么设置可以实现form2弹出后浮在form1的上面,而不受点击form1...
Const SWP_SHOWWINDOW = &H40 Private Sub Form_Load()Dim retValue As Long Rem 将窗体设置为处于所有窗口的顶层，注意在 VB 中运行时，'可能不行，但编译成EXE后就可以了 retValue = SetWindowPos(Me.hwnd, HWND_TOPMOST, Me.CurrentX, Me.CurrentY, 400, 300, SWP_SHOWWINDOW)End Sub ...
vb6.0中怎样让窗体全屏显示?
1、首先在开发工具中打开VBA编辑器。2、在单元格区域当中输入一些内容作为例子。3、在VBA编辑器中插入模块。4、在模块当中输入如下代码，然后运行Private Sub UserForm_Initialize() Me.Height=Application.Height '窗体高度等于Excel程序的高度 Me.Width=Application.Width '窗体宽度等于Excel程序的宽度End ...
VB6.0中如何让一个窗体始终局于MID子窗体之上。
你想写类似查找替换那种窗口吧 frmfind.show 0,me 先看看是不是要这种效果?mdiform1:Private Sub MDIForm_Load()Form2.Show End Sub form1:'什么也没有 form2 '添加一个command1 'mdichild=true Private Sub Command1_Click()Form1.Show 0, MDIForm1 End Sub 工程属性里把启动设置为mdiform...
在VB中怎样使一个窗体始终保护在最前
应用中设置为： HWND_TOPMOST 总在前 HWND_NOTOPMOST 正常的 x,y,cx,cy ---表示窗体的位置和大小的参数,在实际应用中可忽略。wFlags --- 决定窗体是否可以移动和改变尺寸，一般设置成这样的形式： SWP_NOMOVE or SWP_NOSIZE。将 CTRL + ALT + DEL 功能键之功能取消，然后在结束程序之前，...
