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

实现图片平铺于窗体中-VB资料

HTML文档下载 WORD文档下载 PDF文档下载
实现图片平铺于窗体中-VB资料

  很多软件的界面并不是单调的一种颜色填充的,而是有一幅美丽的底图平铺于窗体中。能否用 VB 实现这样的效果呢?作案是肯定的。

  为了实现这一效果,请先把form的picture属性设为你想平铺的图片,然后把以下代码加入,就可以了(注意form的AutoRedraw必须为False)。
Private Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long
Private Const SRCCOPY = &HCC0020
Private Sub Form_Paint()
Dim x As Integer, y As Integer, d As Long
Dim pHeight As Integer, pWidth As Integer
ScaleMode = 3
pHeight = 32  '这里最好设为图片的高度
pWidth = 32  '这里设为图片的宽度
For x = 0 To ScaleWidth Step pWidth
For y = 0 To ScaleHeight Step pHeight
d = BitBlt(hDC, x, y, pWidth, pHeight, hDC, 0, 0, SRCCOPY)
Next y
Next x
End Sub

 

这是前端最好的时代——论前端的“三化”建设 游戏引擎网络开发者的64做与不做(一):客户端方面 六问七牛CDN:打造融合CDN管理服务平台 《近匠》Wilddog野狗,跨平台的实时通信云服务 【CTO讲堂】招人不易留人更难——创业团队要闯哪些关? iOS UIView动画实践(四):过渡与伪3D动画 日程全公布|年度人工智能技术精英聚会 7月26-27相约北京 TypeScript 1.5发布,支持大量ES6新特性 快快快!27个提升效率的iOS开源库推荐 《近匠》Maxense,“云+传感”推动产业变革 【探秘ES6】系列专栏(九):使用Babel和Broccoli 2015年Postgres全球开发者大会参会总结 英特尔硬享公社启动“创意原型拍卖” 对接创意与商机 详解Swift 2.0(一):苹果做的25项改变 2015甲骨文数据库大会:回顾、感恩、展望,欲续写辉煌 Nokia进军VR领域:让人欢喜让人忧 2015中国人工智能大会在京成功召开 成为糟糕游戏设计师的五种打开方式 Stripe使用指南:Swift开发中的信用卡支付 将安全延伸至云端以及更远的地方 专访FreeWheel北京研发中心:一流技术型人才应具有国际化视野 iOS UIView动画实践(五):Keyframe Animation 【CTO讲堂】简说创业公司的技术选型,从BearyChat的开发说起 《近匠》Webix,跨浏览器的JavaScript UI组件库 微软正式推送Windows 10,你会升级最后一款Windows产品? Cinatra:高性能现代C++ Web框架 《移动App测试实战》作者邱鹏:我在测试过程中遇到的那些坑 Rust一周精彩回顾:《高级Rust编程语言》、新增13名贡献者 来自Sony Morpheus的开发灵感: 如何打造逼真的VR游戏? 如何像巫师那样隔空操作——聊聊迷你雷达的原理和应用 等你来战——IBM Cloudant数据库开发大赛火热开启! asp.net是否可以用任何一种vs.net语言? 请教---------一个函数返回指针值的问题!!!! 如何可以筛选出被修改过的数据记录。。。。。。 如何在广域网上实现SOCKET通讯,与局域网有什么不同? invocation在Java中怎么翻译啊? oracle中增量导数据的问题!! 过多的异常捕捉会影响程序性能吗? 二个form时怎样用request来收取数据? 在sybase里健好的表如何从新修改? 一个小问题,这个变量是什么类型的??? 使用通讯控件的疑惑 怎样实现在文本文件中修改某一行的其中字符串 Nokia MobileSet中如何让手机识别中文? 注册表坏了怎么办? 大哥们,能否告诉小弟,在 ms sql server2000中如何修改 sa 用户的口令 我的超星不能用了!!! 十万火急:PDF文件修改 大哥们,能否告诉小弟,在 ms sql server2000中如何修改 sa 用户的口令.. 作为初学者,每天的问题太多了?帮我看一下下面的小问题 我上午53,下午58.该不会下马吧????/我相知道什么时候才能知道是否已经Pass,什么时候下证? 有关DELPHI6中使用SKINENGINE??? C++ Builder中多国语言的问题 在哪下载到Exchange 2000 Server Resource Kit? 快捷方式损坏怎样修复? bluesky069(菜鸟一族)你帮助我把那个PBL放到蛛蛛的信箱好不好呢?让大家都可以下在的! 请问哪里有w32dsm.exe的教程??? 潘译<>印刷错误百出,令人不忍卒读... LISTBOX的问题?请高手帮忙!!高分向送! 帮我想想这个主键该怎么建SQL SERVER7 如何将控件,恢复init()到初始状态 急救:装有SCO UNIX的硬盘克隆后不能启动系统,怎么办? 如何在FTP的目录下再新建目录?我初学网络编程, 怎样设置ScrollView中的ScrollBar不可见? 有关comboBox问题??????急!急!!! 有那位朋友对ADO控件调用T-SQL的链接服务器或存储过程的命令有所了解,或知道怎样取链接服务器的相关信息 真诚的向大家请教一个问题!!先谢谢了 redhat linux7.2安装完成后,怎么没有工具栏 已知manager是employee的子类,那么这么写Employee epy=new Manager()为什么合法? 第五次提出这个问题:如何通过DELPHI调用SQL SERVER 过程向SQL SERVER 存入图象。 为什么我在新闻聚焦中发表不了评论? 在VB里怎样用ADO存贮Access的Memo型字段? 誰有在PB下用powersock做的聊天程序? SQL的好书是什么呀?难道就没有人有体会? vb怎样格式化硬盘?? 做个《曹操传》之类的游戏需要多少投资? 关于sfc(系统文件扫描)的问题 高分求解,大虾请进 买了java程序员大本营的请进!!!! 请大家陈说学msce的前途 如何使用ProgressBar casting在java中是什么意思啊? 如图,在△ABC中,AD是∠BAC的平分线,DE⊥AB于点E,DF⊥AC于点F,求证:AD⊥EF.如题,图如下, 仪表压力变送器问题压力变送器现场安装ZDY9800 0-200kpa的,这个规格的没有了,我想用ZDY9800 0-600kpa的压力变送器,请问对测量的数据准确性有影响吗? 光在固体、液体、气体、真空传播快慢的关系 如图,△ABC中,E、F分别是AB、AC、上的点.①AD平分∠BAC:②DE⊥AB:DF⊥AC;③AD⊥EF.以此三个中的两个.条件,另外一个为结论,可构成三个命题,即①②→③,①③→②,②③→①.(1)试判断上述三 压力变送器怎样连接仪表 物理题一道,求画图方法 如图,AD是△ABC的中线,E,F分别是AB,AC上,且DE⊥DF,求证:BE+CF>EF. 二线制压力变送器怎么接入四线制仪表就是输入信号4-20mA的仪表怎么接受二线制的压力变送器的信号,怎么连接的 求解中学画图题? 如图AD是△ABC的角平分线DE//AC交AB于E,DF交AC于点F.求证:AD⊥EF. 两个力互成30°,大小分别为90N和120N,用作图法求出合力的大小和方向 机械原理题目,作图法求解!已知行程速比系数K=1.5,机架长LAD=100mm,连杆比曲柄长76mm,摇杆离固定铰链A最近的一个极限位置与机架AD成45°,试用图解法设计该铰链四杆机构.并说明所设计出的机 节流装置和流量计的区别是什么?流量计和变送器的区别是什么?有点晕有一种防堵测量装置算流量计还是节流装置? 用画图法求三十度六十度的合力有偏差吗?怎么办? 数学画图题,求画图方法 V锥流量计测量空气的安装要求DN200管径 垂直安装是否可以 两个互相垂直的共点力的大小为30和40牛.用作图法和计算法求它们的合力. 作图题怎么写? 调整型流量计中心节流装置锥体有什么用 如何通过功率算电流,再如何通过电流计算电缆截面积如题 从事中央空调行业,一般都是380V的电压...想学会如何通过机器设备的功率来算用多粗的电缆...希望简单易懂,如果有分类请详细讲解, 铜导线的电阻率大约是多少? 菲格瑞思平衡式流量计与传统节流装置有哪些区别? 作图法确定光源,如图 有一铜块,重量为G,密度为D,电阻率为ρ0把它拉制成截面半径为r的导线,再用它做成一半径为R的圆形回路(R》r).现加一个方向垂直回路平面的匀强磁场,磁场的磁感应强度B的大小均匀变化.则( ).(A 总功率400kw 电压380v ,请问需要用多大电缆? 如图,已知:△ABC全等于△FED,求证:AB‖EF 2个互相垂直的共点力大小分别是90N和120N用作图法和计算法求合力大小和方向 已知功率70KW,线长60米,电压380V,需要多大的开关?用多少平方的铝电缆? 如图,直线AB平行于EF,角CDE=130度,求角ABC+角BCD+角FED的度数 用画图法,怎样确定不规则物体的物体的重心一:一块不规则四边形,如何用画图法确定重心?二:一杯水,再底部钻一小洞,使水不断向出流.问:整杯水的重心如何变化,重心最低是多少 V锥流量计可以用于对原油的测量吗? 如图,AB∥EF,试探究∠ABC,∠BCD,∠CDE和∠DEF之间的关系,并给出证明. 电阻率公式解析电阻率公式的解析,要简洁明了,清楚易懂.快 如图,已知BC//DE,∠ABC=∠DEF,试判断AB和EF的位置关系并说明理由 已知AB//EF,BC垂直CD于C,角ABC=30度,角DEF=45度,求角CDE的度数 电阻率计算公式即 P(电阻率)=S(横截面积)R(电阻)/L(长度) ? 如图,∠ABC的两边分别与∠DEF的两边平行,即AB‖ED,BC‖EF1)在图1中,射线BA与ED同向,BC与EF也同向;在图2中,射线BA与ED异向,BC与EF也异向;在图3中,射线BA与ED同向,BC与EF异向.请问:在上述三种情况 当电路中的电流过大时,电线容易发热甚至引起火灾,原因是什么?怎样才能避免发生这 求 管道大小与压力与流量之间的关系式 如图所示,已知AB//DE,BC//EF.求证:△DEF相似于△ABC. 电流大时电线会发热,请问电压大时电线会发热吗? 铝电缆的电阻率的计算公式急:输出电压是380伏,功率是40千瓦的电机,用铜线电缆传1000米远,应该用面积多大的铝线?我家买了3根铝电缆 每根16平方够吗? 已知如图,A,F,C,D四点在同一直线上,AF=CD,AB‖DE,且AB=DE..求证:(1)△ABC≌△DEF(2)BC‖EF 己知电机功率怎样计算电缆截面积 真空泵极限压力国外的真空泵的极限压力一般是全压力还是分压力啊?有的客户要求10-3Torr,可我看了下大部分的中国制造商都只有2PA=1.5×10-2Torr,或者1.33Pa=10-2Torr,分压力倒是都可以达到.难道是 400A电流380V电压电机选择多大的电缆 热电偶出来2根线+,—,怎么和显示温度数字的仪表接线?如果用变送器,热电偶怎么跟变送器接线?变送器把电压信号变为电流信号后一般和什么设备连接 真空泵的入口压力跟出口压力分别对真空泵有什么影响? 三相380V电机的功率为1.5KW,现改为电源为三相220V/60HZ ,启动电流会增加多少? 铜电线的承载电流大小与铜线的截面积是什么关系?与电压又是什么关系? 已知两个力的大小分别为3N和4N,用作图法求出这两个力互成0°、60°、90°、120°、180°几种情况下的合力 12KW的电动机三相380V电源要多大的电流?且要多大的电线? 电力电缆截面积与电流的关系求:电缆截面积与电流的关系表,民用一般都220V比如2.5平方的线能带起2500W-3000W的功率也就是10A的电流,那给关系表谁能给份,我这里只有57分. 用作图法求出下列各力的合力.作用在同一物体上的两个力,F1=F2=10N用作图法求出下列各力的合力.(1)作用在同一物体上的两个力,F1=F2=10N,它们互成120度角.(2)作用在同一个物体上的三个力,F 一台设备电压为380V(多台电机及照明),在三相进线电缆上用卡钳表量电流每相为100A,请教每小时耗电量多少 所有一切变送器的工作原理是什么?比如温度变送器,压力变送器,液位变送器,它们是怎么变送的? 铜、铝、铁的电阻率分别是多少?请说出大小和单位! 如图,在△ABC中,D是BC边上一点,DE⊥AB于点E,DF⊥AC于点F且DE=DF,EF与AD交于点O,求证AD⊥EF.图发不上来, 是不是有几个压力控制仪表就会要装几个压力变送器吗? 一切气体、液体、固体物质都能传播声音,在真空中会如何?①不能传播声音;②条件不足,无法判定.教教我 Thank you!
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn