VB调用API制作渐变的窗口背景色

2016-02-19 14:55 12 1 收藏

下面是个VB调用API制作渐变的窗口背景色教程,撑握了其技术要点,学起来就简单多了。赶紧跟着图老师小编一起来看看吧!

【 tulaoshi.com - 编程语言 】

  在许多Windows软件的安装程序中,时常可以看到以某种颜色由浅至深的渐变为背景的窗口。使用VB制作这类窗口的方法有不少,而通过调用API函数绘制渐变的窗口背景色,似乎是一种既简单又节省资源的方法。

  首先,在module文件中加入下列声明语句:

  

  Declare Function CreateSolidBrush Lib"GDI"(ByVal _crColor As Long) As Integer  Declare Function FillRect Lib"USER"(ByVal hDC As _Integer,lpRect As RECT,ByVal hBrush As Integer)As Integer  Declare Function DeleteObject Lib"GDI"(ByVal hObject _As Integer)As Integer  Type RECT  left As Integer   top As Integer   right As Integer   bottom As Integer  EndType

  然后,在窗口的Paint事件中加入下列代码:

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)

  

  Private Sub Form_Paint()  Dim Color As Integer  Dim hBrush As Integer  Dim OldMode As Integer  Dim RetVal As Integer  Dim StepSize As Integer  Dim X As Integer  Dim FillArea As RECT  OldMode%=Me.ScaleMode  Me.ScaleMode=3  StepSize%=1+Me.ScaleHeight/80  Color%=255  FillArea.left=0  FillArea.right=Me.ScaleWidth  FillArea.top=0  FillArea.bottom=StepSize%  For X%=1 To 80  hBrush%=CreateSolidBrush (RGB(0,0,Color%))   RetVal%=FillRect(Me.hDC,FillArea,hBrush%)   RetVal%=DeleteObject(hBrush%)  Color%=Color%-4   If Color% $#@60; 0 Then Color%=0   FillArea.top=FillArea.bottom  FillArea.bottom=FillArea.bottom+StepSize%  Next  Me.ScaleMode=OldMode%  EndSub

  按F5运行,就会出现一个以从上至下、由浅至深的渐变蓝色为背景的窗口。对上述代码稍加改动,便可制作出各种颜色和水平方向的渐变背景。

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/bianchengyuyan/)

来源:http://www.tulaoshi.com/n/20160219/1608322.html

延伸阅读
标签: PS 电脑
在PS 工具栏中,有前景色和背景色的设置图标。默认的前景色为黑色,背景色为白色。图标右上角的双向箭头可以快速切换前景色和背景色(快捷键为X);如果点击左下角的小黑白图标,无论当你的画纸为什么颜色,它都会变为默认的黑白前后背景色。(快捷键为D) 点击菜单栏中的文件→新建,跳出对话框,将背景内容设置为透明。确定。 如...
标签: Web开发
最近在访问一个网站的时候,我注意到,当其文字被选中时它有一个匹配他的网站的背景色,这个背景色通常是深蓝色。现在,如果您的网站不使用任何蓝色为文字背景,看上去会不会有点不合适? 当寻找如何实现这一点的解决办法后,我感到惊喜,这竟然非常容易。只需添加以下的CSS到您的网页: ::selection{background: #A8141B; color: white; /* ...
标签: PhotoShop PS PS教程
PS怎么改变照片图片背景色 人物和背景颜色分明的,用魔棒,套索抠出来然后再把背景换了,如果你问我怎么抠图的话,那你就要去看下PS最基本的知识了,我只能把思路给你,如果背景和人物颜色不分明,可以用钢笔和通道抠图。如果你的背景就是单色的,这种直接用图像调整替换颜色 就搞定,最后种适合红底换蓝底,蓝底换红底。 用...
标签: 电脑入门
很多文字工作者,长期在电脑前打字,面对一成不变的白纸黑字,不仅容易产生审美疲劳,更使我们心灵的窗户很受伤。能否为文档设置不同的背景色,从而缓解我们眼睛的疲劳呢? 其实,WPS2007已经为我们提供了蓝底白字功能:从工具菜单中选择选项,并在其中的常规与保存选项卡中选中蓝底白字(图1),原本刺眼的白色页面变成了蓝色,而原本黑色的文字...
PS证件照怎样改变背景色?   1.首先利用PS打开一张照片,如果照片不符合实现尺寸需要,可利用裁剪工具进行裁剪。点击裁剪工具,然后根据实际高宽来进行设置宽度和高度参数,并通过拖动绘制裁剪区域,双击完成裁剪过程。 2.选择魔棒工具,并设置合适的容差,通常为10,点击背景区域,将其选中。 3.点击更改前景色图标...

经验教程

934

收藏

80
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部