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

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

测试工程师的心灵鸡汤:谦虚、不沉默、有危机感、不断努力 高德地图API“沿图有你,晒出你的LBS应用”活动拉开帷幕! 谁能找出Windows 8.1的安全漏洞,就将获得微软10万美元奖金! 【直击美国云计算】Facebook分享数据中心新网络架构Fabric 【直击美国云计算】OCP发起产业界的Maker运动 红帽刘长春:开源是推动云计算和大数据发展的重要力量 【直击美国云计算】出货量达x86的20多倍 ARM或将成为数据中心主角 孙小群:将SAP HANA打造为开放的PaaS平台 GitHub推出重大改进:强调速度、内容和交互性 如何打造测试工程师精英团队? 如何做个有“钱”途的测试工程师? 苹果开始关注企业移动化 iOS 7的10大办公功能 “开源群英会2013” 参会名单(持续更新中) 微软Builder2013前瞻 主打跨平台工具及服务 CMDN 29期:软件测试与管理之路 微软IE10与HIT FM 携手打造全新HTML5官网 专访GenMyModel CTO:一款全新在线建模工具背后的故事 【直击美国云计算】Jason Hoffman:数据和计算的融合将破坏全球利润 【直击美国云计算】如何做Hadoop、流处理框架等技术的采用选择 【直击美国云计算】细数云技术领域成王败寇:从SaaS到SDN 【直击美国云计算】谷歌Jeff Dean:成功的关键是专注 致远V5发布:强调大协同,企业移动化真来了 Mailbox:六星期实现从零到百万用户及日处理亿条消息 代码审查,也要天时地利人和 Clash of Clans产品总监:游戏中的商品定价一开始就要高 移动互联网最核心的竞争是:设计的竞争 【直击美国云计算】面对AWS,VMware不会畏缩 美国白宫任命Twitter法务总监Nicole Wong为副CTO Keek宣布推出首款视频Update API 专访阿里前端工程师:淘宝移动Web开发那些事儿 【直击美国云计算】为什么eBay用燃料电池来驱动他的犹他州数据中心 关于oracle 配置的问题 Oracle数据库实例和数据文件的问题求助 调查:各位用Lotus开发的时候,对源码如何做版本控制的?效果如何? 请问各位高手现在业界对工作流与电子工单有没有统一的标准? 动态生成STATIC 文本框,把里面的文字都加上下划线,怎么做? 有什么好的类似于QQ的局域网通讯程序???可支持WIN98及WINXP间的通讯!!! 我快晕了,急救! 低手勿入,高手请进,剧难??? 一个程序调试中产生的问题 -------数据接收和发送模式的问题!(非资深程序员勿入)100分只给答的最好的 求救!关于坐标系转换问题 现在很多邮件服务器要身份验证,ASP.NET(C#)的SMTPMAIL类有设置身份验证和密码的属性吗? 怎么在基于对话框的程序中加入一幅bmp作为底图? 刚学java,碰到一问题,请 有空进来看看 showMessageDialog的使用问题 disable mainmenu控件的某个subitem怎样实现 哈哈,需要短信网关IP地址及其源代码的快来顶一下。 sybase12.0安装时的问题??? 怎么样能用asp编写使得IE打开pdf文件?在查询后怎样还能在查询的输入框里面保留查询的输入? 如何使用TreeView进行分级管理 触发器的效率问题! 寻求解决方案 组件刷新问题,UP有分 请问 虚拟目录 和 WEB站点 有什么区别? DBEXPRESS的问题!很简单 请问那里有支持中文好的jsp开发的webmail下载?很急!谢谢大家了! 我如何在程序中切换输入法 怎么把一个COleDateTime类型的变量转成time_t类型(long型)变量? 结构成员这样定义 WCHAR bString[0]; 长度为0有意义吗? 关于DLL中的函数 如何动态分配指针数组? 哪里有关于delphi多线程资料下载? 急!!!SQL2000数据库IMAGE图象数据的存取?????? 这个存储过程怎么写? D7中的这个怎不见了啊-----急急 为什么只能传递两个汉字?有解决的办法吗? 关于DLL文件中的函数 lotus菜鸟请求急就!!!!!!!! 如何动态分配指针数组? 怎样实现点击按钮,将光标所在行的某列参数传到另一个form,显示出另一个表的某条相关记录? 这句话到底有什么含义??? T-SQL连接字符串的操作符号是? 问一个送分问题。 如何得到驱动器信息? (腊肉)欢迎讨论:简体、繁体同界面显示问题 請問在水晶報表里怎樣實現這樣的設計 谁有校友录? 欢迎讨论:简体、繁体同界面显示问题 用VB写了Lable控件,但不知如何把背景是否透明的属性加入 这堆警告是什么意思? 关闭API函数? 急问吡啶和顺丁烯二酸酐能反应吗?请问顺丁烯二酸酐和吡啶能反应吗? 为什么单缝衍射试验中缝越窄条纹数越多?(请给出数学推导,) 古代的人喝什么水?3Q我个人觉得古代的人大部分喝矿泉水,那时候环境资源没怎么开发,大部分喝山泉,溪水,河水,这些水中都含有一定的矿物质! 在三氯化铝存在下,吡啶与乙酸酐作用生成的产物主要是什么? 泊松亮斑和单缝衍射1.这个亮斑为什么可以说明光有波动性?为什么它是衍射形成的呢?(书上讲的实在没理解)2.单色光单缝衍射时,中间条纹最亮最宽没错,为什么两侧条纹会变窄?3.有关单缝 为什么水永远都喝不腻呢?3Q 实物证据最能够证明的认定是()A存在性B完整性C所有权D计估 关于单缝衍射的疑问单缝衍射可以用传统学说(阵列波面法)解释,但是我有一个疑问,就是波是在不断向前运动的,这一瞬间波峰恰到达屏,下一瞬间就是波的其它部分甚至波谷到达屏,那么它 为什么咪唑比吡啶碱性强? 药厂QC检验员主要操作的仪器有哪些呢 某同学用加热氯酸钾和二氧化锰的方式来制取氧气,加热前他称得混合物的质量为15g,完全反应后,称得剩余...某同学用加热氯酸钾和二氧化锰的方式来制取氧气,加热前他称得混合物的质量为15g 什么是静压水池 格兰仕光波炉其它各方面都正常,就不能加热!谁有解决方法? 实验室加热氯酸钾和二氧化锰的混合物共15g制取氧气,待反应完后,冷却称得固体物质10.2g,计算:(1)制得氧气多少克?(2)原混合物中含氯酸钾多少克?(结果精确到0.01) 如果有一只苍蝇落入你的水杯中,你会怎么办? 新买的格兰仕光波炉不加热怎么办? 为什么氮气中两个氮原子成键是成3个共用电子对? 静压水池向下供水400米处水压是多少 某浓度的稀硫酸与足量的锌粒反应,在一定条件下,为了减缓反应进行的速率,又要保证生成氢气的量不变要加什么?话说书上答案给的是醋酸钠,是因为醋酸钠水解产生醋酸,使氢离子减少.但水解 共用电子对的形成共用电子对是因为一个原子容易失去电子,另一个容易得到电子(出自百度百科),那么为什么不会形成两个离子而形成了共用电子对呢?两个相同的元素也会形成共用电子对, 最不利配水点与贮水池最低工作水位的静压差怎么算谢谢 化妆品微生物基础知识 在建筑图中有一个房间 叫静压室,它是做什么用的房间? 杂交育种的看图一就行了经过a、b、c过程,后代中矮杆抗病植株中不能稳定遗传的占2/3这句话是否正确我算来算去都不是.好的再加分,我关于F2代的计算结果和你一样但F3的和你不一样,你看看 化妆品微生物欧盟标准求助,化妆品中微生物检测,欧盟与美国的标准? 将15g氯酸钾,二氧化锰混合物加热至无氧气放出 固体质量为10.2g 原混合物中氯酸钾质量分数是多少 高一生物 杂交育种至少要4年?为什么?怎样算一年?解释下/ 如何控制化妆品微生物超标 怎么在EXECL表格中就算几个数据的总和?l例如.就算中间10个数的总和SB请绕开 培育矮秆抗锈病小麦新品种的方法如下:纯种的高秆(D)抗锈病(T)×纯种的矮秆(d)易染锈病选出符合要求的品种.下列有关该育种方法的叙述中,正确的是 [D ] A.过程3为单倍体育种B.过程 如何净化浑浊的自来水,自来水浑浊(水锈)无沉淀.净化后营养会流失么. 怎么在EXECL表格中就算几个数据的总和?l例如.就算中间10个数的总和 求一段数据的总和 死细胞的细胞膜的透过性死细胞的细胞膜是全透性还是失去透过性? 如图为一种椭球体磁铁,该磁铁磁性最强的部位在哪里呢? 测量结果的表示方法 死细胞细胞膜具有全透性的原因没有了蛋白质运输,为什么反而能通过呢 右图为一种椭球体磁铁,该磁铁磁性最强的部位在哪里 线桥法,如果碰到有共用电子对的物质该怎么办? 细胞膜皱缩会使细胞死亡吗?会丧失半透膜的性质吗? 微生物源有毒物质及其毒性效应是什么? 是否存在四对共用电子对的物质?大家知道氮N≡N 有三对共用电子对,所以性质很稳定,那是否存在四对的那? 单缝衍射问题平行单色光垂直入射于单缝,得到一组夫琅禾费衍射条纹,若将缝宽扩大3/5倍,则原第二级明纹的位置变为第_级_答案是第四条暗纹.但最后得到k=16/5 不应该是第三条明纹吗 是不是所有的有毒物质都是微生物构成的? [普通化学]下列全部用共用电子对成健的物质是A>NaOHB>NH4Clc>BF5d>NaCl 求所有有机基本结构的名称,最好有化学结构式.如:呋喃、吲哚、吡啶、哌啶……等等等等,要全面. 微生物如何除去水中有毒物质 单线桥法,如果碰到有共用电子对的物质该怎么办? 嘌呤的标准值是多少? 有毒物质( )叫做食物链的()作用,产生原因有毒物质1()2() 共用三个电子对且形成气态物质是N2吗 把execl里面的所有数字 统一乘以一个数?如图 一种离子能在细胞膜中运输取决于 手机电子证书是什么意思 哪些因素影响细胞膜的完整程度 自来水浑浊里面含有什么物质啊,喝了有什么危害? 国外科学家是怎么证明神的存在的? 温度对细胞膜通透性影响的原因请问温度对细胞膜的通透性的影响是什么原因?是只改变蛋白质的活性,还是还对其他膜上物质有影响?例如磷脂双分子层而且我听说在高温下,磷脂分子之间会 什么叫做一对共用电子对 怎么投水自尽 么水不可以喝拜托各位了 3Q 中关村被卡女子确认脑死 家属否认其有美国称全美近600只宠物疑因食用中国北京脖子卡护栏女子脑死亡 家属称不相慈溪公司老总险被绑架 主谋是自己昔日垂涎女孩美色 男子宁波当街袭胸总在肯德基过夜的流浪女诞下龙凤胎 帮国内唯一留存最完整红色刊物在温州埋藏西湖龙井红茶开始崭露头角 价格每斤8温州金改进展:民营银行方案已上报或将今年年底杭州-深圳每天开行6对动车 124套,成交量创5年新低 房博会“温州民营银行成立方案已上报或将发行市夏宝龙:加强基层基础 凝聚发展力量浙江加强事业单位岗位聘期考核管理 打俄土豪赠女友电子香烟 镶246颗钻价触目惊心!吸毒前后面部之变我海军“机动-5号”太平洋大演兵中印携手共谋25亿人福祉男明星的大胆\"告白\" 盘点男神心澳推出\"土豪金\"纯金厕纸每卷80中国人获准参加美天文会华西财富聚焦市场热点failed: 《在隐蔽指挥战线上》土耳其首次在中国举办文物展览国家统计局将修订现行国民经济核算体系沪深股市放量上涨白内障手术只有一次成功才能获得最佳视劲浪体育携七品牌入驻中国(成都)国际手机播报在品读诗词中铸魂育人北海舰队某飞行团心理服务助力战斗力提故宫博物院明年起周一全天闭馆failed: 习近平接见全军军事斗failed: 俄罗斯一架客机坠毁 宋代庭院旁新出土部分陶瓷残片伊朗新型国产战略无人机亮相是否小康,得看老乡(权威访谈·学习贯《咱们结婚吧》告了“黄老五”紧紧围绕强军目标深化国防和军队改革各地查处违反中央八项规定问题1.4万阳光100米娅中心:二期新品发布会圆感受绰普山下文化气息(走基层·藏区行
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘