编辑一个form1
在form1编辑一个m_leave菜单
点击m_leave时发送一个消息Private Const WM_SYSCOMMAND = &H112
Private Const SC_MAXIMIZE = &HF030&
Private Sub m_leave_Click()
SendMessage(form1.hwnd, WM_SYSCOMMAND, SC_MINIMIZE, 0&)
End Sub结果在发送消息时产生实时错误6,溢出。本人系统xp+vb6。在线等给分
在form1编辑一个m_leave菜单
点击m_leave时发送一个消息Private Const WM_SYSCOMMAND = &H112
Private Const SC_MAXIMIZE = &HF030&
Private Sub m_leave_Click()
SendMessage(form1.hwnd, WM_SYSCOMMAND, SC_MINIMIZE, 0&)
End Sub结果在发送消息时产生实时错误6,溢出。本人系统xp+vb6。在线等给分
--------------------------------
这样的句子在VB编辑器中就没法通过,需变
SendMessage form1.hwnd, WM_SYSCOMMAND, SC_MINIMIZE, 0&
SC_MINIMIZE 你定义了吗?只看到有SC_MAXIMIZE
SendMessage是怎么声明的?