怎么取消总是最前

Private Declare Function SetWindowPos Lib "user32" ( _
ByVal hwnd As Long, _
ByVal hWndInsertAfter As Long, _
ByVal x As Long, ByVal y As Long, _
ByVal cx As Long, ByVal cy As Long, _
ByVal wFlags As Long _
) As Long
Const Hwnd_TopMost = -1
Const Swp_ShowWindow = &H40

Private Sub Check1_Click()
Dim retValue As Long
If Check1.Value = 1 Then
'启动 总是最前
revalue = SetWindowPos(Me.hwnd, Hwnd_TopMost, Me.CurrentX, Me.CurrentY, 300, 300, Swp_ShowWindow)
Else
'取消 总是最前
End If
End Sub

在'取消总是最前 那里，不知道怎么写....请教一下大家啊！

怎么将cmd设置成总是最前 怎么取消启动前杀毒软件运行 网页怎么总在最前了 我想要取消掉 该怎么办 朋友门帮帮我啊 怎么取消登陆QQ前的认证码 怎么取消掉开机滚动前的动态效果 怎么取消开机前出现的Dos矮人工具箱 怎么取消开机前出现的Dos矮人工具箱屏幕？？ 登录百度前总是系统自动输入密码和用户名，如何取消？ 智能陈桥怎样设置在“总是在最前”？ 网易的popo聊天总是开机启动，怎么给取消