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

用VB制作即时动态按钮

HTML文档下载 WORD文档下载 PDF文档下载
用VB制作即时动态按钮
首先,在主窗体上生成两个大小一样的按钮Command1和Command2,将它们的Style属性都设成1-Graphical,将Command1的Picture属性设为d:\vb\ico\mail01a.ico(变化前的图案,一个关闭的信封),将Command2的Picture属性设为d:\vb\ico\mail101b.ico(变化后的图案,一个打开的信封)。
其次,在主窗体的Private Sub Form-load()中加入以下代码:
Form1.Command1.Top=Form1.Height-7000
Form1.Command1.Left=Form1.Width-1300
Form1.Command2.Top=Form1.Height-7000
Form1.Command2.Left=Form1.Width-1300′使这两个按钮重合并放置在窗体的右上角
Form1.Command1.Visible=TrueForm1.Command2.Visible=False
′隐藏Command2按钮,显示Command1按钮
再次,在Command1-MouseMove事件里加入以下代码:
If Form1.Command1.Visible=True Then
Form1.Command1.Visible=False
Form1.Command2.Visible=True
End If
′如果鼠标移到按钮上就显示打开信封的图案
最后,在Form-MouseMove事件里加入如下代码:(如果按钮放置在图件框上,就在Picture1-MouseMove事件里加入代码)
If Form1.Command1.Visible=False Then
Form1.Command2.Visible=False
Form1.Command1.Visible=True
End If
′如果鼠标移到按钮外就显示关闭信封的图案
经过以上几步后,你的窗体上就有了一个即时的动态按钮,这个按钮的Click事件为Command2-Click。本程序在P100、32M RAM、中文版WIN95上运行通过。
路透社:iPhone 6仅有4.7寸版本,将于5月量产,5.5寸遭冷冻 高端实战技术培训:OpenStack企业应用之路 据统计,Oracle已击败IBM跃居软件行业第二 【技术博客推荐】2014年值得关注的10个开源项目 Intel在深圳建立智能设备创新中心 将投入1亿美元 免费获得价值1200元Unity2014顶级盛会门票! IBM公布Softlayer中国业务落地时间表 推荐30款最佳的数据可视化工具 数据库迁移测试:选白盒还是黑盒? 东软发布首款英特尔架构企业级移动终端解决方案 英特尔与腾讯创立游戏创新实验室 推进RealSense技术 《近匠》系列沙龙之探寻绝密武器:移动跨平台开发 iOS走向开放:苹果新推iAd Workbench广告服务 腾讯薛伟:快速模型更新在精准广告推荐中的应用 微软Build2014第一天要点精华汇总(组图) Windows 8.1 Update 1五大改变:任务栏回归,增强鼠标支持(图) 【十大院士】怀进鹏:全球的计算模式可能重新形成 微软Build2014第一天应了解的15件事 TypeScript1.0发布,完美支持Visual Studio系列产品 欲与Android展开价格战,微软宣布在移动设备上免费开放Windows 2014深圳英特尔信息技术峰会次日要点汇总 4月4日:微软39周岁,生日快乐! 正式进军硬件市场 Atlassian发布可穿戴设备Bitband 云计算时代IT专业人员需具备的10项技能 【走近院士】李德毅:大数据是连接虚拟和现实世界的桥梁 微软Build2014大会第二天干货总结 Microsoft Azure拥抱Puppet、Chef、MongoDB... 唏嘘不已!Brendan Eich上任Mozilla CEO仅十天即因歧视同性恋被迫辞职 最火HTML5 JavaScript游戏引擎:国外篇(一) Facebook发布PlanOut 开源部分A/B测试源码 一周消息树:6款Java转C#的最佳工具、Web开发者必备的9个软技能 对话“宙斯杯”获奖代表:依托京东云平台,打造精品电商CRM [提问]请问哪里有象记账凭证现金输入式的控件?! 谢谢。 怎样在win2000下隐藏linux的分区? 如何查看表的定义及约束 控制条与对话框的问题 那位老兄有<windows防火墙与网络封包截获技术>的光盘,我光有书,没盘 請問怎樣獲得本頁的文件名(除文件名其他部分都不要﹐包括在框架中使用正確) ForBeginner(No.1):Keyword->RedHat8中文显示,AC97,xmms播放mp3 哪位大虾帮我看看这段代码,不胜感激 能否在JSP,Servlet中用asp(js)写的页面 浏览器被黑--恶意加锁:win98的ie 5.5浏览器打开时出现“分级审查窗口”,必须输入正确的密码才能使用? 请教一个关于微软件的.net开发环境的问题?! 有谁用过“微软公文盖章系统” 50分悬赏||____||一个常识问题 java界面控制 有关ASP+ACCESS的查询数据出错,报错 “超出系统资源。 ” java界面控制 求一用php实现压缩/解压缩的程序. 请问在WORD200中有什么好的方法在下划线中输入文字,而下划线不随字体而改动? Excel中保护工作表? 请问使用16倍速的刻录机能刻32倍速的盘吗 MYSQL如何实现自动删除数据库中的记录 紧急提问:CB中那些类用.操作符 请问一个概念的问题:??????????????????????? 如何生成报表文件啊? 装了oracle8i以后怎么登陆不了? 如何按照记录号转到指定的记录?不用SQL 用过magicskin的请进。 无法于数据库建立信任连接的问题_高分有送! 偶这个星期到深圳去,不知道在深圳有那些途径可以找到工作的? 手机掉到马桶里你会怎么办? 各位前辈帮忙看一下这个语句怎么解决(这是一个关于SQL语句的问题) 请教 java 命令的用法 用session跟踪用户的问题。 Xml中查找最大值! 请PHP高手推荐几本高阶的PHP书籍 偶这个星期到深圳去,不知道在深圳有那些途径可以找到工作的? Unicode问题 str:=#0+'9'+#0+'5'+#0+'8'+'~'+#207+'m'+'N' 在线等待。。 定位文件指针? 如何用ADO动态建SQL数据库 哪有 《Visual C++ 实践与提高——COM和COM+篇》下载 iis 为啥总出现 "the special module not found" 学习powerbuilder8.0 看哪些书比较好? 200相送,问题简单 一个使用用户空间控制流程的问题,望各位帮忙解答,小弟感谢不尽,在线等待 iis 为啥总出现 "the special module not found"(补充) 菜鸟问题---applet中的Runable方法, 紧急求助 装机:双敏的UKT400N主板性能怎么样?有啥缺点?适合超频吗? 请问vc编制数据库问题:如何读写binary字段 Chinajiji,看过来!多谢惠寄ISO/IEC 14882 请教各位高手用replace函数替换字符串时如何将颜色也变掉 为什么祥子被称为骆驼? 有关这次雪灾的初中英语作文 未受精的花能结果吗 骆驼在小说中起什么作用?和祥子有什么内在关系 初中英语作文关于假期,将来时 八路军的装备是怎么样的啊? 骆驼祥子中“骆驼”这一外号的由来极其深层次含义 杯子有什么含义? 求一道数学关于运动的应用题?别说没用的! 骆驼祥子把骆驼卖掉是第几章 商店的自动扶梯以均匀的速度由下向上行驶,兄妹两从扶梯上楼哥哥每分钟走20级,妹妹每分钟走15级,结果哥5分钟到达,妹妹6分钟到达,该自动楼梯共有多少级? 中国人民解放军 编制让电视搞得很郁闷 到现在不明白军队的编制,1中国的国家暴力机构是怎么构成的?2野战军和正规军是不是一回事?3预备役和民兵属于正式部队?4民兵和预备役是不是一会事 1填空题 A,B两地相距skm,甲乙两人分别从AB两地同向行进(乙在前,甲在后).当甲追上乙时,甲的行程为s甲,乙的行程为s乙,则s,s甲,s乙三者之间的关系是—————— 关于“一起长大”的名句或名言用于写书法的字数为10个字 急! 商场的自动扶梯以均匀的速度由下往上行驶着,兄妹俩从扶梯上楼,兄每分钟走20级,妹每分钟走15级,结果兄5分钟到达楼上,妹6分钟到达楼上,问该自动扶梯共有多少级(可见)? 一种运动鞋原价228元,现在打六折出售.学校要给排球队买12双运动鞋,一共要多少元? 再生纸是以废纸作原料加工生产出来的纸张.回收的废纸可以加工出相当于废纸原重的5分之4的再生纸,因而被誉为低能耗、轻污染的环保型用纸.(1)李阿姨的为公室整理出80kg的废旧报纸、书 受精后什么和什么开始成长,花朵开始凋谢 若以连续掷两次骰子分别得到的点数m,n作为点p的坐标(m,n),则点p在圆x^2+y^2=25外的概率是? 再生纸是以废纸做原料加工生产出来的纸张.回收的废纸可以加工出相当于废纸原重的五分之四的再生纸,因被誉为低能耗、轻微污染的环保型用纸.据中国造纸协会统计,2010年全国纸及纸板消 标志与标识有什么区别? 粉刷长12米,宽5米,高3米的教师,扣除门窗,黑板面积9.8平方米,粉刷的面积有多少平方米? 一千克废纸可以卖多少元 请问‘标志’与‘标识’的区别 连续掷两次骰子,以先后得到的点数m,n作为点P(m,n)的坐标,那么点P落在圆x2+y2=17外连续掷两次骰子,以先后得到的点数m,n作为点P(m,n)的坐标,那么点P落在圆x2+y2=17外部的概率为(  )记“点P 小学五年级自我介绍 小明在汽车上看见小伟向相反的方向走去,10秒后,下车追小伟,速度比小伟快1倍,比车慢4/5,求小明追上的时间? 已知圆C:x2+y2=9 若连续掷两次筛子记点说为m ,n则点(m,n)在圆内的概率是多少? 有一种杯子,开水倒进去后就可以看见照片,哪里可以定做,多少钱 非诚勿扰!小伟在乘车时,碰见小芬在路上以相反方向经过汽车.6分钟后汽车到站,小伟下车全力追小芬.小伟在乘车时,碰见小芬在路上以相反方向经过汽车.6分钟后汽车到站,小伟下车全力追小芬 已知圆x2+y2=9(1)若连续投两次骰子,记向上数分别为m.n则点(m.n)在圆c内的概率 就是一种杯子 倒进去水之后 杯子壁会出现图画 知道的 并且说下价格河北邢台哪有卖的? 小明在汽车上看见薇向相反的方向走去,10秒后,下车追薇,速度比薇快1倍,比车慢4/5,求小明追上的时间? 高屋建瓴 是什麽意思 茶杯的英文是什么?很急啦!~ 学校把2000元奖学金按两种奖项奖给25名学生,其中一等奖每人200元,二等奖每人50元那么获得一等奖的学生有方程 小佳家离公园6km,小红家离公园4km,小佳家和小红家相距10km,她们约好8点同时出发到公园玩.小佳骑车的速度为12km,小红的速度为10km,小佳比小红早十分钟出发,她们什么时候才能在公园见面? 阅读书刊文章的人叫什么者要三个快点3月11日就要,过了就算了! 学校把20000元奖学金按两种奖项奖给25名学生,其中一等奖每人2000元,二等奖每人500元,那么得一等奖、二等奖的学生各多少名?用一元一次方程解! 易中天说曹操是个可爱的奸雄,请举例说明,并分析 怎样才能心静?有没有好听的歌或者是文章让人很心静的?求推荐. 为什么受精完成后,花的很多结构就会萎缩凋谢? a,b两地相距10km,小王由a骑车到b,速度为12km每小时,在骑车的过程中,有哪几个量?哪些是常量,哪些是变量他们有何限制? 加拿大黄种人人口比例多少 学校发奖金把1000元奖励给小邱.晓华.小青小秋与小华所得的比是3:2小青比小华多20元三人各得多少元? 一面平面镜子竖直放置,一人高1.8米,要想在镜子中看到自己的全身,问镜子至少要多长?考虑该问题与人的身高或人与镜子的距离是否有关.最好写出具体步骤或具体的思考过程。 加拿大的汇率加拿大最新的汇率事多少 cf小秋官网 小秋官网 真的吗为啥我一天刷完了 20此、次封号了其他人有过这情况吗 金星的MP4质量好吗JXD688,质量好不好,一般在什么价位啊. 骆驼是沙漠里的船(扩写)怎么写 聊斋志异之小倩中扮演小倩的是谁 金星mp4的质量如何? 沙漠里的船是( )文,骆驼能( ),能( )是沙漠里重要的交通工具.课文采用了( )的手法,将骆驼比作( ).怎么填 我八路军骑兵以每小时22千米速度追击日寇,当到达某村庄时,得知日寇已于2小时前逃跑.已知日寇逃跑的速度是每小时12千米,八路军骑兵几小时可以追上逃敌? 每次老师在黑板上写字的时候,写到最下面都要半蹲下来写,怎么解决可以让老师好写字(①把黑板设置成不用老师蹲下也可以写字的样子②自己想办法...提示:这个是要做一个小发明!)记住 古文中都是怎么称呼骆驼的?直接叫骆驼吗?有没有一个字的称呼? 花在受精后,都一一变成什么 六年级上册的语文大本上的《骆驼子》这篇文章.马林能够化险为夷的根本原因是( ).选ABCD.A:大娘的掩护 B:敌人的大意 C:马林的机智 D:骑兵连的营救 情侣符号怎么分男女 八路军副参谋长是谁 中国最透明的安全软件:百度杀毒隐私保肯德基“半价桶”遭遇争论 小薯条代替宁海查获一万多罐假红牛 包装味道都和外国驻韩外交官5年犯法48起 外交豁农业部:农垦有望率先实现农业现代化朴槿惠为韩职棒总决赛开球 穿日本运动美媒揭白宫工作准则:不让总统为坏消息叙利亚总统警告:外国停止支持反对派才杨澜提问郎朗\"工作有何意义\"惹争金华餐饮业遭遇寒流 高档酒店与农家乐奥巴马医改网站安全漏洞细节曝光 内测金华看守所推启迪教室 给在押未成年人学者称一线城市过高生活成本让人幸福感能源局发布页岩气产业政策 加大财政扶戴尔完成249亿美元私有化交易 从纳在未建交国书写传奇——记旅居巴拉圭侨爱尔兰政府资深顾问哈利根:中国梦属于马达加斯加总理经济顾问曼德拉拉:中非日本福岛核电站冻土遮水壁预计将使用6专家:注册资本改革反推行政改革 建立\"10.25故意伤害案\"后续:坚冬至祭扫高峰将到 预计冬至当日人流量河北高院向聂树斌父母致歉 将调查是否日兽父性虐小学亲生女致流产 辩称“表广西重建完善“科技专家库” 面向社会点子书包进校园 数字课本引导少数民族讲清中华文化,中央社院力推“十个讲清湖北宜昌:“12.2”全国交通安全日湖北鄂州一面包车冲入水塘17人遇难 “故宫男神”王津亮相《我在故宫修文物聂树斌改判无罪,解开中国司法的一个“万州交巡警开展全国交通安全宣传日集中网络不见人 急得团团转 68名大学搜“附近的人”结识“美女” 男子除了肿瘤医师创立西南首家医生集团 探索肿主人与宠物穿“亲子装” 走在街上回“热心人”掉包银行卡 盗走女子147吃羊肉感染病毒不可信 供应充足价格妈妈坚决反对养狗 她无奈寄养朋友家重庆部分教育民生实事提前完成鲜香菇供不应求 本周价格出现上涨老妈安排在家相亲 她想说分手不容易
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘