Question

在VB中隐藏一个窗体用什么方法,移动一个窗体用什么方法,显示一个窗体用什么方法

Answer 1

在vb的事件里，没有对当窗体移动的时候相应的处理事件接口。然而可以利用子类处理来实现。具体的想法是利用子类处理获得
wm—move的消息
然后传递消息到一个正常的窗体的一个按纽，利用按纽的事件接口来模拟对窗体移动事件的模拟：其具体的实现代码如下：
在窗体里加入一个按纽，命名为eventbn
利用eventbn_click()事件来实现对窗体移动事件的处理/
模块代码如下：
public
oldproc
as
long
public
bnhwnd
as
long
public
function
newproc(byval
hwnd
as
long,byval
msg
as
long,byval
wp
as
long,
byval
lp
as
long)
as
long
if
msg=wm_move
then'捕获窗体移动事件
sendmessage
bnhwnd,wm_lbuttondown,1,0
sendmessage
bnhwnd,wm_lbuttonup,1,0'将消息发送到按纽，使其发生click事件
end
if
newproc=
callwindowproc(oldproc,hwnd,msg,wp,lp)
end
function