更正：效果：雨

最新推荐文章于 2025-05-27 12:31:55 发布

原创最新推荐文章于 2025-05-27 12:31:55 发布 · 1.1k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#hex #string #vb

编程观点专栏收录该内容

16 篇文章

订阅专栏

博客讲述了《效果：雨》中颜色部分BUG的修复方法。在Dim lOther As Long下添加Dim sOther As String，将原文中特定代码替换为新代码。最终通过的环境是VB6+Win2000。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

　　在《效果：雨》中最后我说到颜色部分还有BUG，现已修复，作如下修改：

　　在Dim lOther As Long下加一行：

Dim sOther As String

　　将原文中所有.c = CLng("&H" & Hex$(lBlue) & Hex$(lOther) & Hex$(lOther))全部（共两处）替换为：

sOther = IIf(Len(Hex$(lOther)) < 2, "0" & Hex$(lOther), Hex$(lOther))
.c = CLng("&H" & Hex$(lBlue) & sOther & sOther)

　　即可~

最终通过环境：VB6+Win2000

确定要放弃本次机会？

福利倒计时

: :

立减 ¥

普通VIP年卡可用

立即使用

upsuper

关注关注

0
点赞
踩
0

收藏

觉得还不错? 一键收藏
0
评论
分享

复制链接

分享到 QQ

分享到新浪微博

扫一扫
举报

举报

专栏目录

「MOSS - 19」MOSS队：Alpha阶段项目展示

MOSS2023的博客

05-03

552

MOSS - 00」MOSS队：团队介绍。在项目进行的过程中，我们也根据实际情况进行了一定调整。成员分工于敬凯PM，项目管理，运维姜雨竺前端开发，架构设计，原型设计史泽宇前端开发，前端测试，原型设计王小鸽前端开发，API对接，原型设计王雪竹前端开发，原型设计陈楚岩后端开发，数据库叶颜函后端开发，后端测试以字典序陈楚岩我喜欢睡觉。在本次团队开发中主要担当后端开发的工作。姜雨竺第一次实习那个夏天我说再也不要沾前端了，从此写了一整年的前端。在本次团队开发中主要担当。

「MOSS - 32」MOSS队：Beta阶段项目展示

MOSS2023的博客

06-10

512

参与评论您还未登录，请先登录后发表或查看评论

万字解读：MySQL表的约束

2403_84646142的博客

02-10

1051

为了防止在数据表中插入错误的信息，MySQL定义了一些维护数据库完整性和有效性的规则，这些规则就是表的约束。表的约束作用于表中的字段上，可以在创建数据表或修改数据表的时候为字段添加约束。数据表常见的约束有默认值约束、非空约束、唯一约束、主键约束和外键约束，其中外键约束涉及多表操作，这里暂且不进行学习。

自动化脚本：提升蚂蚁森林能量收集效率

weixin_30248619的博客

05-27

982

蚂蚁森林是支付宝推出的一款虚拟植树游戏，旨在鼓励用户通过日常绿色生活行为积累“能量”，用于在现实中种植真正的树木。然而，手动收集能量需要每天定时进入应用进行操作，这对于忙碌的都市人而言是一项挑战。自动收集能量可以有效缓解这一问题，通过编写自动化脚本实现能量的定时收集，从而解放用户的双手，让他们在忙碌之余也能为环保事业贡献一份力量。Auto.js提供了大量的API供用户操控Android设备。以下是一些常用的控件和函数：控件操作：例如用于加载布局，用于查找控件。文件操作：例如。

CSS Grid布局：合并单元格布局

u012028371的博客

12-05

7949

《CSS Grid布局：网格单元格布局》一文中通过一些简单的实例介绍了如何给容器定义网格，并且怎么使用网格线或者网格区域来实现单元格这样的简单的布局。在文章结尾之处也提到过，这样的单元格如同表格一样，仅仅一个个独立的单元格是无法满足一些复杂的Web布局，我们需要将多个单元格合并在一起，拼装成一个稍为复杂一点的布局。简单点说，就是由单元格慢慢过渡到具有合并单元格的布局（在脑海中想想曾经爱过的tabl

基于PLC的智能雨刷控制装置系统设计

DX884164131的博客

02-28

896

摘要汽车雨刷智能控制装置系统主要按照汽车玻璃的雨量大小，对雨刷的速度进行调节控制的工艺设计需求，对系统进行雨刷步进电机进行控制设计，通过调试和仿真达到设计工艺的要求，满足设计的需求。系统主要通过可编程控制器控制方式进行设计，在分析该系统的工艺要求基础上，提出详尽的控制策略和总体设计思路。系统主要由西门子S7-200可编程控制器、传感器检测单元、步进电动机执行机构等组成，系统分为总体设计、硬件图纸设计、软件流程及程序设计以及上位机仿真设计等。在总体设计中对系统工艺进行详细分析，并提出总体设计的思路；在硬件

【机器学习】集成模型/集成学习：多个模型相结合实现更好的预测

TwcatL_tree

10-20

7622

我们通过一个例子来理解集成学习的概念。假设你是一名电影导演，你依据一个非常重要且有趣的话题创作了一部短片。现在，你想在公开发布前获得影片的初步反馈（评级）。有哪些可行的方法呢？A：可以请一位朋友为电影打分。于是完全有可能出现这种结果：你所选择的人由于非常爱你，并且不希望给你这部糟糕的影片打1星评级来伤害你脆弱的小心脏。B：另一种方法是让你的5位同事评价这部电影。这个办法应该更好，可能会为电影提供更客观诚实的评分。但问题依然存在。这5个人可能不是电影主题方面的“专家”。

MySql系列04：MySql表的完整性约束

weixin_40964170的博客

01-31

1049

为防止不符合规范的数据存入数据库，在用户对数据进行插入、修改、删除等操作时，MySQL提供了一种机制来检查数据库中的数据是否满足规定的条件，以保证数据库中数据的准确性和一致性，这种机制就是完整性约束。 MySQL中主要支持以下几种种完整性约束，如表所示。其中Check约束是MySQL8中提供的支持。约束条件约束描述 PRIMARY KEY 主键约束，约束字段的值可唯一地标识对应的记录 NOT NULL 非空约束，约束字段的值不能为空 UNIQUE 唯一约束，约束字段的值是唯一的

更正：请用java代码实现；并且不需要保证每个员工都要至少抢到一个红包

最新发布

07-21

但为了活动效果，我们可以设计成每个员工至少抢到一个红包？题目没有明确，这里我们按照完全随机分配，即可能有的员工没有抢到红包。但是，题目要求输出哪个员工抢到哪个红包，所以我们需要记录每个红包被哪个员工抢...

计算卷积的matlab代码-DFN:分布式反馈网络的单幅图像排水

05-23

但是，受雨条纹和背景纹理图案之间固有的重叠影响，大多数这些方法倾向于或多或少地去除无雨区域的纹理细节，并在恢复的背景中导致过度平滑的效果。为了产生合理的雨条层并提高背景重建质量，我们提出了一种递归...

计算卷积的matlab代码-DFN:用于单图像排水的分布式反馈网络的Pytorch实现

05-23

但是，受雨条纹和背景纹理图案之间固有的重叠影响，这些方法中的大多数趋向于几乎消除无雨区域中的纹理细节，并在恢复的背景中导致过度平滑的效果。为了产生合理的雨条纹层并提高背景的重建质量，我们提出了一种...

checkout-page-master:挑战设计

04-22

- **错误提示**：当用户输入的信息有误时，应提供明确的反馈，指导他们如何更正。 - **加载速度**：优化页面性能，减少加载时间，避免用户因等待而放弃结账。 - **交互一致性**：保持页面元素的交互一致，遵循常见的...

VB字节型数组使用小小结

思想摇篮

07-20

3449

　　字节类型的数组有许多不同于其他类型数组的特性，他相对于其他的数组有时也更方便，下面是本人对字节型数组的小小结（可能还很浅，所以不敢叫小结）　　首先是它的特性，它可以直接转换为字符串型（String），可以直接赋值，但是不推荐，至少要用CStr来转换，不过效果不是很好，常会出现乱字符，就算没出现一般也和预期不同，这是由于在数组转字符串的过程中VB默认采用ANIS的字符格式，因此需要采用StrCo

小程序：LRC歌词展开

思想摇篮

07-08

2720

　　LRC大家都知道吧（不知道？就是那个带时间标签的文本歌词格式嘛~），很好用的东东~所以最近很多MP3Player也开始支持它了。笔者手上就有一个联想F520的MP3支持，不过有点小麻烦，这个MP3只支持一行一个时间标签，但是笔者手头上的LRC一行都有好些时间标签，像这样，MP3就会把后面的时间标签全部显示出来（晕~）　　看来只能修改修改了~既然我们没办法修改MP3的固件，那就在LRC上动手脚吧

VB：读取MP3的Tag（对网上流行版本改进）

思想摇篮

11-11

2476

网上有一段关于VB读取MP3Tag的代码，但不支持中文。这里我对这个代码进行改进。这是我改进后的代码：Public Type Mp3tag Artist As String Artist 存储歌手信息 Album As String Album 存储唱片专辑信息 Title As String Title 存储标

数据库中的NULL错误

思想摇篮

07-05

1905

我正在编写的新软件采用了数据库，但近日遇到一个问题：有时读取信息时会出现错误，出错段代码如下：str = recMain("Title")错误描述为：实时错误94，无效使用 NULL经分析，由于数据库中相应数据为空，故返回NULL，但String类型不能接受NULL数据，故出错。解决方法：可以使用IIf(IsNull(recMain("Title")),"",recMain("Title"))

VB：双击顺序

思想摇篮

08-29

1533

　　很多人用VB很久，但一直不明白双击触发事件的情况。经过测试，双击触发事件顺序如下：MouseDownMouseUpClickDblClickMouseUp　　也就是说，在DblClick之前依然会触发Click，但不会触发两次。同时可以看到，MouseDown没有被触发两次，但MouseUp被触发了两次，因此可以说，处理MouseUp来计算鼠标点击次数更精确些。通过环境：Win2000+VB6

效果：雨

思想摇篮

07-12

1451

　　好久没下雨了，好想雨啊~用VB做了一个下雨的效果，很粗糙，希望能给大家做一点参考~　　窗体背景设为&H800000，Autoredraw设为True，Width为9600，Height为7200，ScaleMode设为像素，在窗体上添加一个Timer控件，命名为tmr，Interval设为100，输入如下代码：Option ExplicitPrivate Type POINT x1 As