[VB.NET]vb.net 系统最小化消息是什么?
来源:互联网 发布:湖北广电网络连wifi 编辑:程序博客网 时间:2024/05/14 23:45
<script type="text/javascript"><!--google_ad_client = "pub-8333940862668978";/* 728x90, 创建于 08-11-30 */google_ad_slot = "4485230109";google_ad_width = 728;google_ad_height = 90;//--></script><script type="text/javascript"src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>
vb.net 系统最小化消息是什么?
Protected Overrides Sub WndProc(ByRef m As Message)
If (m.WParam.ToInt32 = 126722) Then //系统最小化消息是什么?
MsgBox( 最喜爱 )
Else
MyBase.WndProc(m)
End If
End Sub
__________________________________________________________________________
61472
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)
最新版本:20070212
http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html
__________________________________________________________________________
谢谢!你是怎么查到的?授渔吧,谢谢!
__________________________________________________________________________
Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
If (m.Msg = &H112) Then
If (m.WParam = &HF020) Then
Console.WriteLine( 最小化按钮点击了 )
ElseIf (m.WParam = &HF030) Then
Console.WriteLine( 最大化按钮点击了 )
ElseIf (m.WParam = &HF060) Then
Console.WriteLine( 关闭按钮点击了 )
End If
End If
MyBase.WndProc(m)
__________________________________________________________________________
这是定义好的
http://doc.ddart.net/msdn/header/include/winuser.h.html
__________________________________________________________________________
教教我怎么查吧,我想知道窗体从最小化到窗体重现在屏幕上的消息是什么?
__________________________________________________________________________
最小化的消息是SC_MINIMIZE
__________________________________________________________________________
用 SC_MINIMIZE 要 imports 什么?
__________________________________________________________________________
不需要imports , 你需要自己定义一个常量
Private Const SC_MINIMIZE = &HF020&
If (m.WParam = SC_MINIMIZE) Then
Console.WriteLine( 最小化按钮点击了 )
__________________________________________________________________________
feiyun0112
最小化的消息是SC_MINIMIZE
===================================================
会变量未定义 ,要 import 什么?
__________________________________________________________________________
那在 VC 中 有 SC_MINIMIZE 这常量定义 。vb中不能引用吗?
__________________________________________________________________________
你参考下面的代码,常用常数:
Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
Dim SC_ARRANGE As Integer = &HF110
Dim SC_CLOSE As Integer = &HF060
Dim SC_HOTKEY As Integer = &HF150
Dim SC_HSCROLL As Integer = &HF080
Dim SC_KEYMENU As Integer = &HF100
Dim SC_MAXIMIZE As Integer = &HF030
Dim SC_MINIMIZE As Integer = &HF020
Dim SC_MOUSEMENU As Integer = &HF090
Dim SC_MOVE As Integer = &HF010
Dim SC_NEXTWINDOW As Integer = &HF040
Dim SC_PREVWINDOW As Integer = &HF050
Dim SC_RESTORE As Integer = &HF120
Dim SC_SCREENSAVE As Integer = &HF140
Dim SC_SIZE As Integer = &HF000
Dim SC_TASKLIST As Integer = &HF130
Dim SC_VSCROLL As Integer = &HF070
If (m.Msg = &H112) Then
If (m.WParam = SC_MINIMIZE) Then
Console.Write( 最小化按钮点击了 )
ElseIf (m.WParam = SC_MAXIMIZE) Then
Console.Write( 最大化按钮点击了 )
ElseIf (m.WParam = SC_CLOSE) Then
Console.Write( 关闭按钮点击了 )
ElseIf (m.WParam = SC_RESTORE) Then
Console.Write( 还原按钮点击了 )
End If
Console.WriteLine(m)
End If
MyBase.WndProc(m)
End Sub
__________________________________________________________________________
但你们用
Dim SC_CLOSE As Integer = &HF060
这样常数,操作系统变了怎么办?
__________________________________________________________________________
一般是不会变啦,这是微软定义好的
就算变啦,只要该这个常数就可以拉
__________________________________________________________________________
常数
是不会变的,不会变的才叫常数:)
__________________________________________________________________________
vb.net 系统最小化消息是什么?
Protected Overrides Sub WndProc(ByRef m As Message)
If (m.WParam.ToInt32 = 126722) Then //系统最小化消息是什么?
MsgBox( 最喜爱 )
Else
MyBase.WndProc(m)
End If
End Sub
__________________________________________________________________________
61472
*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)
最新版本:20070212
http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html
__________________________________________________________________________
谢谢!你是怎么查到的?授渔吧,谢谢!
__________________________________________________________________________
Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
If (m.Msg = &H112) Then
If (m.WParam = &HF020) Then
Console.WriteLine( 最小化按钮点击了 )
ElseIf (m.WParam = &HF030) Then
Console.WriteLine( 最大化按钮点击了 )
ElseIf (m.WParam = &HF060) Then
Console.WriteLine( 关闭按钮点击了 )
End If
End If
MyBase.WndProc(m)
__________________________________________________________________________
这是定义好的
http://doc.ddart.net/msdn/header/include/winuser.h.html
__________________________________________________________________________
教教我怎么查吧,我想知道窗体从最小化到窗体重现在屏幕上的消息是什么?
__________________________________________________________________________
最小化的消息是SC_MINIMIZE
__________________________________________________________________________
用 SC_MINIMIZE 要 imports 什么?
__________________________________________________________________________
不需要imports , 你需要自己定义一个常量
Private Const SC_MINIMIZE = &HF020&
If (m.WParam = SC_MINIMIZE) Then
Console.WriteLine( 最小化按钮点击了 )
__________________________________________________________________________
feiyun0112
最小化的消息是SC_MINIMIZE
===================================================
会变量未定义 ,要 import 什么?
__________________________________________________________________________
那在 VC 中 有 SC_MINIMIZE 这常量定义 。vb中不能引用吗?
__________________________________________________________________________
你参考下面的代码,常用常数:
Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
Dim SC_ARRANGE As Integer = &HF110
Dim SC_CLOSE As Integer = &HF060
Dim SC_HOTKEY As Integer = &HF150
Dim SC_HSCROLL As Integer = &HF080
Dim SC_KEYMENU As Integer = &HF100
Dim SC_MAXIMIZE As Integer = &HF030
Dim SC_MINIMIZE As Integer = &HF020
Dim SC_MOUSEMENU As Integer = &HF090
Dim SC_MOVE As Integer = &HF010
Dim SC_NEXTWINDOW As Integer = &HF040
Dim SC_PREVWINDOW As Integer = &HF050
Dim SC_RESTORE As Integer = &HF120
Dim SC_SCREENSAVE As Integer = &HF140
Dim SC_SIZE As Integer = &HF000
Dim SC_TASKLIST As Integer = &HF130
Dim SC_VSCROLL As Integer = &HF070
If (m.Msg = &H112) Then
If (m.WParam = SC_MINIMIZE) Then
Console.Write( 最小化按钮点击了 )
ElseIf (m.WParam = SC_MAXIMIZE) Then
Console.Write( 最大化按钮点击了 )
ElseIf (m.WParam = SC_CLOSE) Then
Console.Write( 关闭按钮点击了 )
ElseIf (m.WParam = SC_RESTORE) Then
Console.Write( 还原按钮点击了 )
End If
Console.WriteLine(m)
End If
MyBase.WndProc(m)
End Sub
__________________________________________________________________________
但你们用
Dim SC_CLOSE As Integer = &HF060
这样常数,操作系统变了怎么办?
__________________________________________________________________________
一般是不会变啦,这是微软定义好的
就算变啦,只要该这个常数就可以拉
__________________________________________________________________________
常数
是不会变的,不会变的才叫常数:)
__________________________________________________________________________
- [VB.NET]vb.net 系统最小化消息是什么?
- VB.NET窗口最小化
- vb.net发音系统
- VB.net怎么最小化到系统托盘
- [VB.NET]vb.net的学前准备是什么?
- C#/VB.net/VB 获取系统时间
- vb.net和c#.net最小化到托盘
- [VB.NET]VB REDIM
- VB与VB.NET
- VB.Net与VB
- VB与VB.NET
- vb.net显示系统信息
- vb.net 获取系统语言
- [VB.NET] 文件查询系统
- [VB.NET]显示系统信息
- [VB.NET源码]工资管理系统
- vb.net获取系统信息
- VB.NET 系统登录功能
- [VB.NET]脆求:C/S模式如何实现呢?小弟非常感激
- [VB.NET]winform中,怎样取消子窗口的Icon??
- [VB.NET]Object variable or With block variable not set
- 谋划(28)
- [VB.NET]大家看看,这段代码出错了,要怎么改,谢谢,,在线等,当天结贴!!!!!!
- [VB.NET]vb.net 系统最小化消息是什么?
- [VB.NET]调用主窗体的组件
- [VB.NET]利用Timer控件的Tick()事件在自定义控件上绘制动画!
- [VB.NET]急求vb.net2005连接sql和acc数据库代码!~~给分30!
- [VB.NET]VB.net下重命名文件的操作问题,为什么在我重命名文件之后,原始文件仍然存在(在有I/O异常时)
- [VB.NET]带密码的连接字符串怎么写?
- 新华社加沙办公室曾遭以军轰炸 无人员伤亡 以色列空袭加沙已致285人死亡900余人受伤
- [VB.NET]请问如何将从数据库提出来的一列数据存入一个数组中?
- [VB.NET]PictureBox1.Image = mybitmap2这样之后是不是打印bitmap呢?