Option Explicit

Private Sub Form_Click()
        End
End Sub

Private Sub Form_Resize()
        Label1.Left = (Me.ScaleWidth - Label1.Width) / 2  '标签库label1水平居中显示
        Label1.Top = Me.ScaleHeight / 4             '标签框label1的高度位于窗体的1/4处
        Label2.Left = (Me.ScaleWidth - Label2.Width) / 2
        Label2.Top = Me.ScaleHeight / 2
        Label3.Left = (Me.ScaleWidth - Label3.Width) / 2
        Label3.Top = 3 * Me.ScaleHeight / 4
End Sub

Private Sub Timer1_Timer()
        Label1.ForeColor = QBColor(Rnd * 15)  '标签框label1中的文字颜色是随机变化的
        Label2.ForeColor = RGB(255 * Rnd, 255 * Rnd, 255 * Rnd)
        Label3.ForeColor = QBColor(Rnd * 15)
End Sub

颜色调配:

一、RGB函数

RGB是Red,Green和Blue的缩写。众所周知,自然界的可见光都是由红、黄、蓝三色混合而成,但是在调色上却不是这样,我们用的颜料其实是由红、绿、蓝三色调配而成,在计算机上调色也是一样,所以出现了RGB函数。

说简单点,其实RGB函数就是利用红绿蓝三种颜色的不同分量值得到不同的颜色。格式很简单:RGB(R,G,B),其中R,G,B三个值的取值范围都是0~255,数值越大,颜色添加比重也大。当所有值都为255(即RGB(255,255,255)时),颜色为白色。

二、QBColor方法

QBColor方法可以简单的看作RGB函数的简化版,用0~15这一共16个数字代表了16种颜色,而且与RGB函数一一对应。

这16种颜色分别是:黑(0)、蓝(1)、绿(2)、青(3)、红(4)、紫红(5)、黄(6)、白(7)、灰(8)、淡蓝(9)、淡绿(10)、淡青(11)、淡红(12)、淡紫红(13)、淡黄(14)、亮白(15)。

格式如下:QBColor(颜色值)

三、VB颜色常量

VB一共定义了8种常用的颜色常量,分别为VbBlack(黑色)、VbRed(红色),VbGreen(绿色),VbYellow(黄色),VbBlue(蓝色),VbMagenta(紫红色),VbCyan(青色),VbWhite(白色)。

使用格式也很简单,例如:Text1.ForeColor=VbBlue 就是为Text1的文字选择蓝色。

四、直接输入颜色值

以上三种方法都不是直接调取颜色的方法,那到底什么是直接调取颜色的方法呢?简单,直接输入颜色值就好了。

直接输入颜色值所表达的颜色是最多的,整整有256*256*256=16777216种颜色!虽然看起来RGB函数也是利用红、绿、蓝三原色搭配,也是这么多种,但是一般来说,RGB函数仅仅是给了一个近似颜色,而直接输入颜色值的时候才是直接从颜色库里面直接调取!

表达方法稍微复杂一点,需要使用十六进制来选择三种颜色的搭配分量,格式如下:&HBBGGRR,其中&H代表使用十六进制,BB,GG,RR分别指蓝绿红三种颜色的值。

VB工程处---百例66--网站页面相关推荐

  1. 【JS 逆向百例】webpack 改写实战,G 某游戏 RSA 加密

    关注微信公众号:K哥爬虫,QQ交流群:808574309,持续分享爬虫进阶.JS/安卓逆向等技术干货! 声明 本文章中所有内容仅供学习交流,抓包内容.敏感网址.数据接口均已做脱敏处理,严禁用于商业用途 ...

  2. 如何在网站页面布局SEO关键词

    以京东为例 首先要了解必要的基础知识,什么是SEO以及搜索引擎的工作原理.这样才能继续下面的话题. 在网站页面布局SEO关键词关乎网站页面后期能否获取更高搜索展现和用户体验.关键词合理布局在各个网站页 ...

  3. 【JS 逆向百例】某空气质量监测平台无限 debugger 以及数据动态加密分析

    关注微信公众号:K哥爬虫,持续分享爬虫进阶.JS/安卓逆向等技术干货! 文章目录 声明 逆向目标 写在前面 绕过无限 debugger 方法一 方法二 方法三 抓包分析 加密入口 动态 JS 本地改写 ...

  4. 【JS逆向百例】某音乐网分离式 webpack 非 IIFE 改写实战

    关注微信公众号:K哥爬虫,QQ交流群:808574309,持续分享爬虫进阶.JS/安卓逆向等技术干货! 文章目录 声明 逆向目标 逆向过程 抓包分析 参数逆向 webpack 改写 IIFE 传数组 ...

  5. C语言趣味程序百例精解

    1.绘制余弦曲线 在屏幕上用"*"显示0~360度的余弦函数cos(x)曲线 *问题分析与算法设计 如果在程序中使用数组,这个问题十分简单.但若规定不能使用数组,问题就变得不容易了 ...

  6. 雅虎网站页面性能优化的34条黄金守则(转)

    2019独角兽企业重金招聘Python工程师标准>>> 雅虎团队经验:网站页面性能优化的34条黄金守则 1.尽量减少HTTP请求次数       终端用户响应的时间中,有80%用于下 ...

  7. 网站页面制作教程[纯萌新]

    网站页面制作教程[纯萌新] 看起来很高大上,其实会者不难. 大约一周之前,笔者的高中同学在朋友圈招募队员参加商赛,因为同学是外校的,我不经意地评论了一句"想参加,可惜不是本校的", ...

  8. c/c++ 趣味程序百例

    C/c++趣味程序百例(献给C/C++初学者) C/c++趣味程序百例(献给C/C++初学者) 1.绘制余弦曲线 2.绘制余弦曲线和直线 3.绘制圆 4.歌星大奖赛 5.求最大数 6.高次方数的尾数 ...

  9. C语言趣味程序设计编程百例精解

    C/C++语言经典.实用.趣味程序设计编程百例精解(1)  1.绘制余弦曲线 在屏幕上用"*"显示0~360度的余弦函数cos(x)曲线 *问题分析与算法设计 如果在程序中使用数组 ...

最新文章

  1. gSTM:Ubuntu 上的 SSH Tunneling 图形界面管理工具
  2. hibernate4 和 spring3 整合注意事项 否则java.lang.NoSuchMethodError异常
  3. MyBatis-16MyBatis动态SQL之【支持多种数据库】
  4. python 求list最小值的索引_【挑战自学Python编程】第六天:前五天都学了啥?
  5. vue v-for指令
  6. 关于JavaScript的变量和函数提升
  7. python测试开发django-44.xadmin上传图片和文件
  8. openwrt安装蒲公英_网速不给力?双宽带叠加,立马消除卡顿
  9. vb.net 的 openFileDialog 控件文件筛选器使用
  10. 程序员:要想成为一个伟大的程序员
  11. React Native Fetch封装那点事...
  12. python怎么读写文件-手机上怎么写pythonPython文件读写详解及设置文件的字符编码...
  13. 机场三字代码和四字代码的资料汇编
  14. flash静态的农夫走路_FLASH静态图形图像演示课件
  15. 光环《全脑思维下的敏捷产品构建》总结
  16. R语言——矩阵中删除缺省值可用的函数
  17. Java算法实现 BAT公司为什么要考算法 github
  18. 2017年总结及2018年规划
  19. 可以真正带你理清同步阻塞与同步非阻塞与异步阻塞与异步非阻塞的文章
  20. ctf解密图片得到flag_CTF从入门到进(fang)阶(qi)之MISC

热门文章

  1. 02.各类存储器芯片和内存地址空间
  2. SSR,SPA,SEO的理解和对比
  3. 图片 频率域 matlab_时间域电磁法勘探的正演问题研究
  4. 阿里云ECS服务器购买详细流程(图文并排)
  5. 【重磅】Crust详解波卡平行链插槽竞拍机制!
  6. Safengine Shielden v2.3.7.0 驱动脱壳
  7. 年底了,你敢炒老板鱿鱼吗?
  8. 如何判断素数(C++版)
  9. 基于Canvas的动画基本原理与数理分析
  10. 从德国勒索软件活动看恶意代码的生存方式-云栖社区-阿里云