给最小化按钮写代码
请问给最小化按钮添加操作的函数是什么?
最小化就是设置windowstate是吧
另外,还有一个问题
qq中用CTR+ENTER来发送
但是我做的时候却有一个问题
我用一下代码监视键盘操作
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Dim CtrlDown
CtrlDown = (Shift And vbCtrlMask) > 0
If KeyCode = vbKeyReturn Then ' 键组合.
If CtrlDown Then Call Command1_Click
End If
End Sub
//其中Command1就是发送按钮
结果却是发送后又回车一行
我设置text1.text=""都没有用
是不是这个回车键重复记录了
上面这个函数操作后,textbox又记录一次