vb 编程 高手进!!

2024-11-28 18:02:51
推荐回答(1个)
回答1:

两个窗体,复制以下代码即可alt+z显示和隐藏
Dim
v
As
Integer
Private
Sub
Form_KeyDown(KeyCode
As
Integer,
Shift
As
Integer)
If
Shift
=
2
Then
If
KeyCode
=
90
Then
If
v
=
1
Then
Form2.Show
v
=
-v
Else
Form2.Hide
v
=
-v
End
If
End
If
End
If
End
Sub
Private
Sub
Form_Load()
v
=
1
End
Sub