说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

VB如何让Window不接受键盘输入及Mouse Click

HTML文档下载 WORD文档下载 PDF文档下载
VB如何让Window不接受键盘输入及Mouse Click


就好比呼叫MsgBox之後,Form就不接受Mouse Click与KeyPress,但是Form仍可处於Activate的状态,即我们暂停了Mouse Click,KeyPress,等待我们要做事都做完了,再将之回复。不过Mouse仍可自由的移动,若要让Mouse也不能动,就使用JournalPlayBack Hook,而不是使用本方法。

EnableWindow()可达目的,第二个叁数传0进入则不能输入,传1则相反

Private Declare Function EnableWindow Lib "user32" (ByVal hwnd As Long, ByVal fEnable As Long) As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Private Sub Command1_Click()
Call EnableWindow(Me.hwnd, 0)
Me.Caption = "现在拒绝KeyPress, MouseClick"
Dim i As Long
For i = 1 To 100
Call Sleep(100)
DoEvents '虽有DoEvents,会发现,按Form的任何地方都没有反应
Next i
Me.Caption = "现在解除了"
Call EnableWindow(Me.hwnd, 1)
End Sub

杂谈 App Store 之 HIG 与 Objective-C 为什么苹果三星将主宰智能电视未来? 罗永浩可爱多:Smartisan OS即将发布 春晚 VS. 移动应用:用户注意力统计报告 Twitter发布BootStrap 2.3版本! 面向对象编程从骨子里就有问题——看看名人大家是如何诋毁面向对象的 开发者及团队能从LibreOffice那里学到什么? 8000美元存储135TB数据:打造开源的存储硬件 Bing,每月27亿的有效搜索不及僵尸网络的一半 为什么说Amazon的James Hamilton是“可遇不可求”的? Facebook背后的数据团队 红帽将产品转移到Apache社区 Impala是如何提升3~90倍查询效率的? 云中保障数据安全及完整性必须防范的遗留问题 VMware推出移动性平台:VMware Horizon Suite 移动周报:全球最大校园Hackathon的参赛宝典 Unity3D首届游戏创意设计大赛开始报名 中国日报:向移动新媒体蜕变 C#五子棋程序设计 Mozilla宣布推出Firefox OS 面临四大问题 Ruby 2系列首个稳定版 Ruby 2.0.0-P0发布 微软改进Windows Blue搜索 系统或今夏推出 移动新趋势:扁平化设计 vs. 拟物化设计(下篇) 传奇程序员:Minecraft开发者Notch大神 让沟通更便捷 ConnectYard宣布推出全新的Web API 在Hadoop上运行SQL:程序员需知晓的13种数据工具 怎样用好Eucalyptus? AWS攻势变猛,Rackspace主动降价CDN与云存储 惠普将于下季度推出低功耗的Moonshot服务器 webOS复活!LG收购webOS用于智能电视 那些因为HTML5而将消亡的产品 错在哪里了? 又快到毕业就业的季节,看看这两道题(c),就当热身如何? 这些是不是b/s模式??为什么?? 决心重新捡起丢下多年的数学,大家祝我好运吧! lj8101(笨笨)请进 !!!可用分不再增加的对策!!! 急,关于SQL查询 请问怎样new一个多维数组? 简单的application高手赐教!小妹急啊,谢谢! net 关于程序接口问题,请高手指教!!! 高手帮忙 我在SQL2000中有个字段类型是SMALLDATE,与CEDIT控件联结后,类型是CTIME,但显示不出? 我该怎么学? 怎样让我的程序运行时,始终在最前面 散分!!!回到CSDN!! 经常在运行屏幕保护时VC6.0 就出现了运行错误 嘻嘻~`问同学借了一台数码相机回家,自已拍了几张房间里的照片.大家有兴趣的就去吧!小A房间大暴光 请众位大侠,能不能强烈的推荐一本关于Delphi入门级的经典著作!谢谢了!推荐者必有分 请教! 关于Win32下的字符串操作 菜鸟提问,估计大家都会,指点一下 为什么我用ie的时候,新打开一个页面,他的还原形式的大小总是最小化的? var oXL = new ActiveXObject("Excel.Application")这句话有什么问题? 高分求算法 如何根据IP来得的到对方的操作系统类型 怎么这么老套,大家想想办法啊! 我要学DirectX了,请大家帮忙找一些这方面的资料。 关于出错信息的问题,多谢指教! Csdn,为什么你现在不忙了! asp.net的优点到底在哪里 大家能否推荐几本无线应用方面的书(如:短信编程、WAP编程), 谢了! 最基本问题 哪位写过控制摄像头的例子, 如何使用XP的远程桌面管理?远程控制. float 5.29 显示出来会是什么? 要不要学c++ 不能保存文件了,怎么回事? CString的一个问 在vs,net中创建用户控件和组件有什么区别? Lotus Notes and Domino与LOTUS 1-2-3有什么差别? 问路 JBuilder中类找不到 Montaque,看到后请进,问题有点菜,但希望你尽快回答! 大家帮帮我啊谢谢 private的意义是什么呢? 这是怎么回事啊,经常遇到的问题 请问windows编程和windows网络编程哪种编译器最好 新手提问--初装redhat7.2问题多多 请问如何在iis中提供证书认证?急! ASP.NET能不能用记事本写?! 我用儿童狡猾的目光察觉,她爱我们.(狡猾的意思)还有:还写了一封信劝我,说我是“心清如水的学生”.(心清如水的意思)可是回想起来,那时候我却觉得是给了我莫大的支持!(莫大的意思) 我希望进了中学以后,-----------(造句) 夜的拼音我不知道可以告诉我吗 作文《一次难忘的谈话? 英语日记 30字就可以 简单易懂就好 20篇 麻烦下 、 日本杀了那么多蓝鲸,国际社会没有指责吗?现在世界上还有多少头蓝鲸啊 儿童狡猾的眼光察觉,狡猾的含义和表达作用 I want every day together with you 摆渡自己 生命的日子里,有晴天,也会有阴天、雨天、雪天.人生的路上,有平川坦途,也会撞上没有舟的渡口、没有桥的河岸.烦恼、苦闷常常像夏日里的雷雨,突然飘过来,将心淋湿.挫折、苦难常 阿拉伯半岛与我国南部地区都位于北纬20°~30°的亚热带,北回归线都穿过其中,为何阿拉伯半岛气候干旱,降水稀少,而我国南部却气候湿润,降水丰沛 我用儿童的狡猾的目光察觉,她爱我们,并没有要打我们的意思.这句话中的狡猾是什么意思. I do not want such a day,I want to be with I argued___my best friend____that yesterday.I feel very sorry now.A.to; about B.with; about C.with; for D.to; for 第一次会说话 作文不是,是作文 云对雨 雪对风 晚照对晴空 押什么韵 请问狡兔三窟是什么意思? 浅谈如何建立一个良好的班集体 云对雨,雪对风, 我想起个英文名?给点意见吧名字是李小璐 第6题谢谢了 用希望就是...希望就是...造句 I a_____ my best friends.I am very angry with her.填什么 如何建立良好的班集体 (1)生命的日子里,有晴天,也会有阴天雨天雪天.(2)人生的路上,有平川坦途,也会撞上没有舟的渡口没有桥的河岸.(3)烦恼、苦闷常常像夏日里的雷雨,突然飘过来,将心淋湿.挫折、苦难常 狡兔三窟有什么教育意义 四字怎样词语接龙 摆渡自己与诺曼底号遇难记在主旨上有何不同初一补充习题17,急 Stranger think I was quiet,my friends think I am very cheerful,my best friend know 怎样建立良好的班集体 要用过去式要80词左右 狡兔三窟是什么含义 和竹子相近的动物是什么 初中暑假英语生活日记,带范文 (十篇左右)谢谢!如题 狡猾是什么意思? 我要造句,是关于星星的作文,其中我需要的是;找到了属于他们自己的那颗***的星.是给予地震中的灾民希望找到了属于他们自己的那颗( )的星 生活日记用英文怎么说 口是心非的意思是啥!请问 大家帮我想下,与“期待和您合作”相配的词语.-- 名片用的,需要找个词语搭配,正面是“期待与您合作”的落款,反面也需要5个自的落款,最好押韵,符合公司对客户的意愿 云对雨.雪对风接下来是?急. 狡猾的意思 我是来自云南的某某,我的家乡是云南边陲的一个小城市,我的家乡虽然小,但这里有最美丽的风景和最朴素的人民,还有爱我的爸爸妈妈.对噢,我是参加一个选秀比赛,开头应该怎么称呼观众 上面是 “般”下面是 “皿” 这个字 什么读音?是一种水果 桃 狡兔三窟的意思 宾语从句造句1我想知道那本书多少钱?2我希望明天更好 3你能告诉我他的妈妈是谁 4你能告诉我的书包在哪5老师告诉我们明天去北京 用过去式造快在线等 于字头下面一个皿怎么念 汤姆很爱他的电脑英文翻译 英语翻译ve que tiene probelmas 一个虎字头里面一个"田" 下面一个"皿",怎么念 Wishes you to be happy 好重要的! 上课不要迟到 早睡早起 不要丢三落四 晚上不要熬夜 认真听课 上课不要睡觉 英语翻译啊 CO(NH2)、NH4HCO3、(NH4)SO4、NH4NO3、NH4CI中各元素质量比与氮元素的质量分数. 我用儿童的狡猾的眼光察觉她爱我们中狡猾是什么意思 一年以后,我希望造句 NH4NO3,NH4HCO3,CO(NH2)2和(NH4)2SO4氮元素质量分数最大的是 英语翻译请问 1》 不一定快乐 除了翻译成 not necessarily happy ,可以翻译成not certainly happy么 为什么?是不是CERTAINLY后面只能接 动词?2》动词“规定”怎么翻译?是STIPULTE么?REGULATE也可表示“规定” 用英语:我希望…………(造句)还有:How+adj.+主语+谓语……是多么…… ...come from...(来自于) 摆渡自己 阅读问答.答对了再追加分(1)生命的日子里,有晴天,也会有阴天、雨天、雪天.(2)人生的路上,有平川坦途,也会撞上没有舟的渡口没有桥的河岸.(3)烦恼、苦闷常常像夏日里的 一次难忘的谈话(作文)要400字左右 每天主动与大人聊天不少于10分钟.谈话内容不限,可以谈自己对一部电视剧、一本书的看法,也可以向父母了解他们的工作,可以谈遇到的趣事,也可以提出 英语翻译yes i love you,so i want to married with you! 帮忙把这个字打出来.上面一个"日"字头,下面一个"文"字.我不知道怎么打.
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘