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

实现鼠标移到窗口上时变大,移出窗体时变小(如《东方快车》)-VB资料

HTML文档下载 WORD文档下载 PDF文档下载
实现鼠标移到窗口上时变大,移出窗体时变小(如《东方快车》)-VB资料

用Form 的 Mouse_Move事件来检查鼠标是否在窗口内:
  如果在窗口内就使窗口尺寸变大(Me.Height = 大窗口高度值);
  如果鼠标离开就使窗口尺寸变小(Me.Height = 大窗口高度值);
  但是,最好不要直接对窗口的尺寸进行增减,应该首先判断窗口尺寸是否已经是所需窗口的大小,最后设定窗口始终在最前方。下面附上代码,供参考:
  '首先应设置Form1.BorderStyle = 0
  Option Explicit
  Dim a As Long
  Dim b As Long
  Private Sub Form_Load()
  a = 3500
  b = 1000
  Form1.BackColor = vbMagenta
  Form1.Width = a
  Form1.Height = b
  End Sub
  '鼠标移动到窗口则窗口变大反之则变小
  Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
  Form1.Width = 8200
  Form1.Height = 2450
  If (X > 8000) or (Y > 2000) or (X < 200) or (Y < 200) Then '在理论上应取0   Form1.Width = a
  Form1.Height = b
  End If
  End Sub

苹果获弯曲屏新专利 可给手机弄个大波浪卷 真正的跨平台硬件测试:3DMark已打通PC、iOS、Android 将Chrome浏览器变成终端工具 【开源推荐】AllJoyn:打造全球物联网的通用开源框架 21张图带你走进Google数据中心 Snapchat C轮融资5000万美元 投资方是Coatue Management 又一个被谷歌寄生的平台,Chrome应用启动器现来到OS X上 雷军遇上刘德华:创业、艺术、移动互联网 为了抗衡Android,传微软开始考虑WP和WinRT免费 维护代码库的五个精华实践 微软发布安全补丁 IE11.0.2随之而来 Qt 5.2正式版发布 全面支持移动平台 如何节约手游制作成本?揭秘CocoStudio编辑器强悍功能 市场竞争白热化:三大云服务商上演双十二“三国杀” UCloud联手盛科实现SDN硬件应用 AWS,还有多远? Instagram推新私信功能Direct:支持照片、视频和文本信息 微软CEO鲍尔默最后一次受访:我的正确决定远远大于过错 中国创新碰撞硅谷思潮, 2013云世界大会定义云时代 Mozilla与设备商、运营商成立开放Web设备联盟 研发周报:暴露程序员身份的8个行为 专访“月熊志”公益网站技术负责人:利用技术的力量保护动物 【Hadoop技术博客推荐】站在风口的Hadoop技术研究者 2014趋势预测,大数据将成主流 国人当自强:两岸三地在线编程学习网站大搜罗 一周消息树:微软畏惧Chromebook、苹果失去优秀工程师 Google Dart语言开启标准化历程,取代JavaScript仍艰难 11款网站死链检测工具 谷歌Chromecast 2014:开放SDK、建生态系统 大举进攻客厅 优秀程序员的6个共同特质 开源的力量:“中国杯”游戏极限开发大赛 一个非常简单的问题 TListItem的Data属性(void)如何使用呀,如何读出它的值呢? bmp to ico 今天看到一个怪现象~! 软件过来人为小弟指点~~ bmp to ico 如何打开控制面板 高分求教,我爱上了兄弟的女朋友,我该怎么办?(100分) 求助:在首次适应算法和最佳适应算法中,分区分配和分区回收的c语言实现。 同在一个城市,呼吸着同样的空气,都为这老板的几块大洋打拼,蓦然回首才知道已经几年了,也该为自已的未来思考一下了。。。 请问有关两个宏 bmp to ico 硬盘无法访问的问题,急!!!估计是被黑了 ISA2000中的问题,特急,在线求助 处理窗口关闭时的动作? 高分求教,我爱上了兄弟的女朋友,我该怎么办? (100分) 请问不通过Image控件如何用直接用DC来显示一个BMP?? 请问现在数据库开发技术有哪些?大致情况? 高分求教,我爱上了兄弟的女朋友,我该怎么办? (100分) 高分求教,我爱上了兄弟的女朋友,我该怎么办? (100分) 请问汇编用什么编译器最好啊? 有什么可以下的电影啊,提供网址,谢谢 下午闷啊:( 怎样让字体自动适应分辨率 高分求教,我爱上了兄弟的女朋友,我该怎么办? (100分) 高分求教,我爱上了兄弟的女朋友,我该怎么办? (100分) RowCount属性怎么用 VCL派生类的属性发布问题,请高手指教 中国能否成为世界第一? 有关cisco路由器上copy子集的疑问 怎样将msn的email用outlook express收到本地! 请告知msn的 pop smtp服务器 如何动态画出函数的图象? 高分求教,我爱上了兄弟的女朋友,我该怎么办? (100分) 有创意的T恤~~ Transaction not connected! 高分求教,我爱上了兄弟的女朋友,我该怎么办? (100分) 高手求救 aspnetnemu注册吗 陨落雕老弟昨日开始中考,祝福他,放分! installshield打包时可以加入密码吗? 救命! 怎么在WM_DRAWITEM自画LISTVIEW? 有关txt文件操作的问题? 一个很奇怪的问题,高手请看, 马上给分 那里有更多的skinengine换肤文件? 奇怪的问题,高手请看,马上给分! 怎样给一个OLE控件其内置的事件编写脚本? 请问各位能否将一个VF的数据库方便的转为ACCESS数据库 如何关联一个扩展名到我的程序? 我有一个备注memo的字段,想更新?如何进行? www.ipowerweb.com 的主机怎么样? 高数、线性代数与程序员!!! 还行是什么意思 密度实验得出什么结论 长2.3m深度0.4m的衣柜,做平开门大概要多少钱?用细木工板,刷清漆.在南阳这边. 有人说我长的还好是什么意思啊 背水一战是韩信攻哪国 小学语文写物作文的注意事项及写法 php中实例化对象&是什么意思?$db=new Creat(); 和 $db=& new Creat(); 有什么不同呢?多一个“&” 如图,已知A(8,0),B(2,0)两点,以AB为直径的半圆与Y轴正半轴交于点C,求经过A,B,C三点的抛物线解析式.解析式中a为-1/4而我算出来的a是-1/5我是通过求得在半圆 中点 坐标为-3,从而求出最高点坐标为 为什么甲午中日战争失败而朝鲜战争却胜利 暑假快到了,我们将要结束了小学阶段的学习生活.(修改病句) 从长方形剪出圆柱两个底侧面积,这个圆柱的体积最大是多少? 成语丢什么落什么 7个 哪位能提供个化学冰袋的配方?(一次性的那种,不要太复杂) a.7=b/2 a,b=? 抗美援朝战争和甲午中日战争中国都以援助朝鲜的战略方式卷入战争的为啥甲午失败抗美却胜利了写一篇分析报 Helps Smooth away the appearance of fine lines and dry skin这段英文怎么译? 如果a乘7=b÷2,那么a:b=( ):( ). 梳妆台上有一串钥匙和一些光盘 翻译 英语翻译设计了基于单片机AT86S52和MAX038的信号发生器,用于产生频率和幅度均可程控调节的正弦波,矩形波和三角波信号.MAX038函数发生器配以少量外围器件负责产生波形,波形再经过运放电路 A /B=12…7,B最小等于多少?当B最小时,则A等于多少? 把边长分别为a,b的长方形卷成一个圆住的侧面,则圆柱的体积为(要过程) 我们通常所说的“北斗七星”,在天文学上是指: 人机工程学发展的几个重要阶段,成就和影响? 把边长分别为a,b的长方形卷成一个高为b的圆柱,那么圆柱的体积是 浮生如梦是什么意思 人机工程学发展历史 求问这是什么鞋 何谓浮生如梦? 一个闹钟在梳妆台上吗?翻译成英文 求问这个鞋子是什么品牌? 浮生如梦为欢几何 黑土地 韩静霆阅读答案 朝鲜国和清国怎么回事?最近在看 最强七友 不明白里面怎么还有个清国,怎么还说朝鲜国事战败国,清国人还特瞧不起朝鲜国人,怎么回事?清国是什么?不要太复杂的……还有!我也是满族人…… 浮生如梦,冷暖自知 大家都知道圆周率约为3.1415926,这个数值的计算过程是什么? 我的世界1.7.2怎么染色 夫天地者...浮生如梦,为欢几何?啥意思? 黑土地 山西出版社,第9课, 上海东方明珠电视塔的高度为468米,若从塔顶自由下落一小球,欲使球B上升过程中与A上海东方明珠电视塔的高度为468米,若从塔顶自由下落一小球A,如果A球自由下落的同时正下方地面上的小球B 急需2010时事评论+750字2篇不要超过950字……好的追加分数…… 有一个苹果在梳妆台上.英语翻译 为什么柜子里会出现白色粉末状的东西掉在那?经查看没发现是从哪掉下来的丫~好奇怪~ 地球离北斗七星所在星域有多少光年? 共六节车厢,每节坐四人,小明第十八个上车,他应坐地节车厢?怎样解题 背水一战里韩信是个怎样的人 北斗七星中的北斗四距离我们仅53光年,比天枢、天玑、天璇离我们都近,为什么反道不容易看到呢?是不是因为北斗四的星等问题,它究竟是一颗什么样的恒星?北斗四的距离数据我是在googleearth 有6节车厢,每节车厢坐4人,小明排在第18个座位上,他坐第几节车厢? “给”的近义字是什么?能体现文言文形式的 英语翻译 如图,由点P(14,1),点A(a,0)是x轴正半轴上一个动点,点B(0,a)是y轴正半轴上一点(a>0)且三角形PAB的面积为18,求a的值. 我爱她.我很喜欢她很久了.一直没动摇过.一直处于追她的状态.因为我感觉我是有希望的 ,最终跟她在一起的人是我.我为她付出了很多.就差没把命搭上.一切都给了她.我想这辈子她都不会遇到 求人教版六年级上册数学难题,要有讲解 背水一战是形容项羽的还是形容韩信的?要讲清楚,谢谢😊 椭圆形的桩怎么算量?比如:护壁为0.3m,直段是2m,桩径是1.3m,怎么算每米的体积,如果有扩底又该怎么算? 可还行是什么意思 如图,若A(0,a),B(b,0)分别是y轴、x轴的正半轴的两点,且过a边形的一个顶点可以引出3条对角线,b边形的内角360° .1、求出点A,B的坐标及△OAB的面积 2、点c为X轴轴上的一个动点,过点C在CE⊥x轴交直 请问因为的为字念第几声 他腰痛,我问怎么样了,他说还可以,我不知道是痛还是不痛 多做几次实验,对得出实验结论的作用是什么 导管一次埋入混凝土灌注面以下不应少于0.8m;导管埋入混凝土的深度宜为2-6m 分别指的是什么啊 不是相冲突的么? 中国与中东欧青年政治家论坛在京开幕沪指重挫1.25% 大消费普跌银行独专家称地下水九成遭污染 修复一亩地最中联重科A股收跌2.94% H股股价俄富豪赠女友奢华电子香烟 镶246颗俄媒称中国和印度商定定期举行联合军演意大利父子专制冒牌名酒遭警方查获 将星巴克回应售价质疑 称在中国利润不比“秀中文”成为俄罗斯政要新时尚美国男子跑马拉松织出近4米长围巾 破文莱将实施严厉伊斯兰刑法 通奸者将被日本首相安倍表示将对离岛等土地买卖实高考降英语比重引热议 能否撬动高考改日式料理或将成非物质文化遗产 已通过美情报局局长:有关美国窃听法国电话报德媒称俄前首富霍多尔科夫斯基难获释 日本156名学者成立研究会 呼吁改善QQ群里热聊\"如何结束生命\" 2应急反应从2小时缩短为5分钟 水管理“好声音”导师汪峰开唱 不理与章子怡韩国称重启金刚山旅游需首先保障游客安东方明珠:视频业务增速放缓,新业务实5月13日 4家上市公司现利空标的公司股权转让生变 中基健康终止收开评:沪指低开0.26% 稀土永磁概博敏电子复牌跌停 造假上市疑惑未消国民党:国共论坛积极筹备中 将朝年底南京市公共机构环湖健走5公里 倡导绿两市融资余额连降5日 跌破8400亿今日市场前瞻:七大利好PK一大利空9家钼矿企业倡议继续减产 3股直接受量子通信概念股大涨 三力士涨逾8%南山铝业:定增完善上游“铝电”资产,云铝股份:显著降低用电成本,尽享铝价央行今日实施300亿逆回购操作 本周凯利泰:KMC椎体后凸成形系统获准在永辉超市:生鲜实力一流抵御电商,携手去年,琼瑶状告于正的《宫锁连城》抄袭重磅:阿里加入反假货联盟 疑似涉及利每一位妖娆的骚男,上辈子都是折翼的天这俩妹纸太不像话了,上着课怎么能玩手李铁:姆比亚伤停,恒大与华夏幸福没可
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘