任务要求：

Excel高手用VBA解决最大数字连续次数，用VBA统计E列中1出现最大连续次数,结果保存H20,用按钮控制结果。

Sub tes3t()
    For Each x In Range("e5:e" & [e65536].End(3).Row)
        If x = 1 Then
            n = n + 1
            If k < n Then k = n
        Else
            n = 0
        End If
    Next
    [H22] = k
End Sub

求职信是自我推销的一种形式，是个人想要得到某个职位或某项工作而写的信件。尤其是作为偏向技术方面的VB开发专业要如何写好一份求职信呢？

求职信有特定的格式规范，作为一封正式的信件，更需要注意这一方面。求职信通常包括介绍段、主体段、结尾段三个部分。介绍段需要包括对收件人的称号，申请人需要申请具体职位以及对该职位职能的基本介绍，简单来说就是你对于该职位的理解。主题段需要重点突出简历中与申请职位最相关的能力和成就。结尾段点出进一步联系求职者的联系方式。

着重介绍自身技术

IT之家（www.ithome.com）：伊朗黑客用VB程序破坏赌场计算机

不要激怒国外政府的领导人，这是索尼影业得到的教训。而根据彭博商业周刊的报道，索尼影业不是唯一一家被外国黑客破坏计算机网络的公司：拥有拉斯维加斯多家赌场和酒店的Las Vegas Sands Corp.也遭到了类似攻击，原因是Sands的最大股东Sheldon Adelson去年10月发出呼吁，用“核平伊朗”的威胁让伊朗放弃核武器发展计划。

伊朗最高精神领袖哈梅内伊回应说，美国政府应该甩某些嘴巴贱的人的耳光。今年初，与政府无关的伊朗黑客开始监视Sands公司的网络，对公司的VPN入口发动暴力破解攻击。

下面是代码分享

Sub 添加超链接()

Dim sr As Range 申明数据类型变量

For Each sr In Range("i2", Cells(1, "i").End(xlDown)) 循环单元格区域

Sheet1.Hyperlinks.Add sr.Offset(0, -1), sr.Value 添加超链接

Next 循环达到结束

上一篇文章中给大家分享了VBA基本语法中的算术运算符，比较运算符。

今天就给大家分享一下另外两个比较重要的运算符，一个逻辑运算符和一个通配符。

什么是逻辑运算符？

逻辑运算符一般是应用于判断逻辑运算式的真或者是假，返回值只能是真（True）或者假（False）。

And 这是逻辑“与”运算，表达式A与表达式B 当表达式A和表达式B的值都是真（True）时返回值也为真（True），否则返回值是假（False）。

VB程序是一种常见的编程语言，在软件开发方面有着重要的应用。因此，VB程序的软件著作权也备受关注。今天我们就来讲讲关于VB程序申请软件著作权的事项。

一、什么是软件著作权？

相信很多在公司上班的亲们，都遇到过一个问题，别人发过来一个EXCEL的文件，每次打开，EXCEL上方都弹出一个提示框，说宏被禁用，提示是否启用宏，而且好像有些功能，比如别人用的按钮等，用不起来了，这确实难倒了一部分同事

其实，弹出这样的安全警告，很多文件，是没有安全风险的，之所以这样，存在于两个原因：

今天学习了刘金玉老师零基础VB教程的第65期，学习的主要内容是贪吃蛇游戏开发，初始化一条蛇。

1.初始化一条舍身思路：

（1）使用绘画line画蛇

（2）注意一节一节画出来

（3）确定每一节蛇身的位置

（4）确定每一节蛇身的长度

（5）line、print、circle绘画出来的效果，需要自动重绘，开启autodraw属性。

2.代码

Private Type node '定义每节舍身的变量类型

今天学习了刘金玉老师VB编程教程的第21期，学习的主要内容是冒泡排序算法。

一、算法的主要种类

1.算法的种类有冒泡排序法、选址排序法、折半查找法、快速排序法、穷举法等。

2.补充知识：variant数据是一种特殊的数据类型，除了定长string数据及用户定义类型外，可以包含任何种类的数据。使用vartype函数或者typename函数来决定如何处理variant中的数据。

二、冒泡排序法

1.定义变量时如果没有明确变量类型，那么它默认的类型为variant类型。

每年只要编程语言排行榜一更新，总有评论说：VB怎么还没消失？不是早就被淘汰了吗？可你一看榜单，VB一直稳稳排在前十。

有人看不懂了：都2025年了，还有人用这个30多年前的语言？

其实，这不是技术的问题，是需求的问题。

不是技术先进就能活得久，关键是“谁能解决问题”