
函数(VBA)
文章平均质量分 57
山水CAD筑梦人
CAD二次开发,筑造梦想 QQ443440204
展开
-
arcgis 中通过字段计算器vb代码进行字段操作——土地利用现状数据库中应用实例
Null 定义:Null是一个特殊的值,表示一个变量或表达式不包含有效的数据。它通常用于数据库编程中,以表示未知或缺失的数据。用途:当一个变量或表达式被赋值为Null时,它表示该变量或表达式没有被初始化或没有有效的值。在VB中,如果一个变量的值为Null,尝试对其调用方法或属性可能会导致错误,因为Null不是一个有效的数据类型,它没有任何方法或属性可用。判断:可以使用IsNull函数来判断一个表达式是否为Null。例如:If IsNull(myVariable) Then ...。原创 2024-12-19 15:57:45 · 1094 阅读 · 0 评论 -
Vba实现复制文本到剪切板
End Sub。原创 2024-11-29 08:04:22 · 710 阅读 · 0 评论 -
Vba选择cad中不同类型图元(Select Case True语句和like用法)
Case ent.ObjectName Like "*Line":如果 ent.ObjectName 包含 "Line",则此表达式为 True,将执行 MsgBox "This is a Line"。Case ent.ObjectName Like "*Circle":如果 ent.ObjectName 包含 "Circle",则此表达式为 True,将执行 MsgBox "This is a Circle"。Select Case True 将这些布尔值与 True 进行比较,并执行匹配的代码块。原创 2024-08-06 21:39:13 · 675 阅读 · 0 评论 -
VBA转换大小写——`LCase` 和 `UCase` 函数用法
在VBA中,Select Case 语句在找到第一个满足条件的 Case 后,就会执行相应的代码块并跳出整个 Select Case 结构。如果你希望多个条件都能被检查并执行相应的代码,那么 Select Case 可能不是最合适的选择。在这个示例中,如果 value 是 2 和 3,那么将会显示两个消息框,分别是 "Value is 2" 和 "Value is 3",因为每个条件都是独立检查的。在这个示例中,每个 If 语句都是独立的,因此如果 value 符合多个条件,所有相应的代码块都会被执行。原创 2024-08-06 21:24:54 · 1164 阅读 · 0 评论 -
批量遍历、输出D盘所有文件名及路径——vba实现
输出一级目录下的文件,若输出所有文件,则需修改插件代码 (若想导出硬盘下所有文件和文件夹,则需用递归算法。导出一个文件夹下所有文件名,可用vba插件实现,如图。原创 2024-07-30 20:22:50 · 678 阅读 · 1 评论 -
vba打开关闭浏览器——shell函数
【代码】vba打开关闭浏览器。原创 2024-07-23 18:27:01 · 1075 阅读 · 0 评论 -
014集——RSA非对称加密——vba源代码
RSA算法基于一个十分简单的数论事实:将两个大质数相乘十分容易,但是想要对其乘积进行因式分解却极其困难,因此可以将乘积公开作为加密密钥。今天介绍一种安全的加密方法,RSA非对称加密。以上即为加密解密vba代码。原创 2024-07-22 16:29:22 · 421 阅读 · 0 评论 -
vba计算逆矩阵
【代码】vba计算逆矩阵。原创 2024-07-17 15:21:08 · 233 阅读 · 0 评论 -
excel vba 实现输入当天日期(时间)——format(now)函数
vba实现输出当天日期,代码如下。原创 2024-07-15 20:35:40 · 4003 阅读 · 0 评论 -
vba实现编码转换 ——Ansi转 unicode
stm.SaveToFile FilePath, 2 '2可省略,adSaveCreateNotExist =1 , adSaveCreateOverWrite =2。If bak Then FileCopy FilePath, FilePath & Format(Now, "-yymmdd_hhmm") '备份文件。'示例:Call WriteToTextFile("File/FileName.htm",Content,"UTF-8")stm.Mode = 3 '3-读写,1-读,2-写。原创 2024-05-19 00:00:29 · 528 阅读 · 0 评论 -
vba模拟键盘发送命令:sendkeys语句
为了说明在按下其它按键时应同时按下 SHIFT、CTRL、及 ALT 的任意组合键,请把那些按键的码放在括号当中。例如,为了说明按下 E 与 C 的时候同时按下 SHIFT 键,请使用 "为了指定单一键盘字符,必须按字符本身的键。为了表示多个字符,就必须在字符后面直接加上另一个字符。例如,要表示模拟键盘按下 A、B 及 C,可用。为了指定上述任何一个字符,要将它放在大括号 ({}) 当中。为了说明在按下 E 的时候同时按下 SHIFT 键,但接着按 C 而不按 SHIFT,则使用 "原创 2024-04-22 09:06:48 · 2501 阅读 · 2 评论 -
byref和byval:一文读懂按地址传递(默认)和按值传递——vba
按值传递(Byval),是指将主程序的值(副本一份)给子过程,过程对副本操作,主程序输出的仍是原值。若想输出值传递后的值,可在子过程中设置输出。按地址传递(ByRef),是指主程序直接将数据交给子过程(过程中定义传递方式),在过程中修改、调试、返回给主程序,主程序输出的是修改后的值。由此可见,byref会修改主程序变量值,而byval不会改变主程序变量值。byval ,被调用程序 按值传递,传回主程序的参数,回调时会不受改变。byref ,被调用程序 按地址传递,传回主程序的参数,回调时会受影响。原创 2024-04-16 10:53:59 · 1585 阅读 · 0 评论 -
返回内存地址——vba代码实现
在64位Office中vba7,应使用LongPtr代替vba6中Long。运行两次,地址均不一样,由此可见,每次内存随机为变量分配地址。Sub 返回内存地址()原创 2024-04-16 10:47:26 · 367 阅读 · 0 评论 -
vba代码实现暂停一定时间功能(sleep函数)
sleep win32 api原创 2024-04-09 17:25:29 · 2425 阅读 · 0 评论 -
016集——随机打乱并重新排序数组——vba实现
已知一个数组,将数组内容打乱并重新排序,可采用以下算法: 由此可见,本案例排序10万个数,耗时不到0.02秒。原创 2024-04-01 09:56:26 · 1039 阅读 · 0 评论 -
015集——vba 产生随机字符
第一个随机字符随机8个字符(具体数字可自己设定),第二个随机字符为1个特殊字符,2个数字和5个字母(可自己设置),同时包含了数字、字母、特殊字符。原创 2024-04-01 09:51:48 · 263 阅读 · 0 评论 -
013集——vba实现字符串加密与解密
以下为asc加密代码,关于rsa非对称加密请联系本博原创 2024-03-26 17:20:11 · 817 阅读 · 0 评论 -
012集——显示高考天数倒计时——vba实现
【代码】显示高考天数倒计时——vba实现。原创 2024-03-06 19:58:10 · 741 阅读 · 0 评论 -
011集—vba代码将汉字用(utf-8)编码写入文本文档
在vba中,根据提供字符串(包含汉字等符号)可以得出相应的utf-8对应的十六进制编码,代码如下 :原创 2024-02-25 18:05:30 · 1100 阅读 · 1 评论 -
010集——vba代码读取二进制文件并返回十进制(十六进制)数字代码
电脑文件主要分为文本文件和二进制文件,文本文件可直接读取文字化的内容,如txt格式文本等,二进制文件不可直接读取底层代码,如shp文件等。通过下面CAD vba 代码可读取出文本内容。'版权声明:本文为博主原创文章,遵循 CC 4.0 BY-SA 版权协议,转载请附上原文出处链接和本声明qq443440204。'原文链接:https://blog.csdn.net/原创 2024-02-22 11:24:43 · 827 阅读 · 0 评论 -
ASCII码值与字符转换
3. CODE函数:与ASC函数类似,也是将字符转换为对应的ASCII码。比如,=CODE('中’)将返回20013,因为字符’中’的Unicode码为20013。4. UNICHAR函数:与CHAR函数类似,也是将ASCII码转换为对应的Unicode字符。比如,UNICHAR(20013)将返回字符’中’,因为Unicode码为20013的字符就是’中’比如,=CHAR(65)将返回字符'A’,因为ASCII码为65的字符就是' A'。比如,=ASC(A)将返回65,因为字符 A的ASCII码为。原创 2024-02-20 15:19:16 · 4521 阅读 · 0 评论 -
009集——vba实现内存中大小端序的转换(附不同进制转换代码)
小端序为很多系统默认的数据存储方式,但有些数据格式为大端序模式解读文件,因此我们需将小端序字节颠倒排序,这样用大端序模式解读此文件,最后即可读取我们想要的内容。原创 2024-02-16 15:50:11 · 633 阅读 · 2 评论 -
008集——Vba常用函数大全
、“MISSING…Left(string, x)、Right(string, x)、Mid(string, start,x)- 取string左/右/指定段x个字符组成的字符串Ucase(string)、Int(number)、Fix(number) - 都返回参数的整数部分,区别:Int 将 -8.4 转换成 -9,而 Fix 将-8.4 转换成 -8。Trim(string)、Ltrim(string)、Rtrim(string) - 去掉string左右两端空白,左边的空白,右边的空白。原创 2024-02-13 13:04:54 · 934 阅读 · 0 评论 -
007(2)集再论大端序与小端序(精华)
小端序的另一个好处是,如果逐字节的运算从个位数开始(比如乘法和加法),可以从左到右依次运算一个个 u64,算完上一个再读取下一个。它的内部实现是把整数分成一个个较小的单位,通常是 uint32(无符号32位整数)或 uint64(无符号64位整数),按顺序组合在一起。上图中,32位整数0x00000001更改为16位整数0x0001,大端序是截去前面两个字节,这时指向这个地址的指针必须向后移动两个字节。小端序就没有这个问题,截去的是后面两个字节,第一位的地址是不变的,所以指针不需要移动。原创 2024-02-12 23:20:04 · 427 阅读 · 0 评论 -
007集——数据存储的端序(大端序和小端序转换代码)——VB/VBA
如果将其放入字节数组aByte中,则a为aByte(0),b为aByte(1),也即是说左边的存储到低地址,右边存储到高位置。3、要想用指针来处理数据,那就得明白数据在内存里的结构(最近系列文章正在分享,欢迎关注),更需要明白数据在内存中的存储顺序问题,这就是端序啦!8、答案是否定的,这跟计算机只认整数的原理是一样的,为了简化计算机设计,一种类型的计算机往往只默认一种端序,尤其是在存储领域。6、再比如数字12345,左边的1比右边的2要大,也即是说低位置是高单位,高位置是低单位。那在计算机里,能否这样呢?原创 2024-02-10 19:24:08 · 540 阅读 · 0 评论 -
009集——磁盘详解——电脑数据如何存储在磁盘
首先我们要明白的是,计算机中只有0和1,那么我们存入硬盘的数据,实际上也就是一堆0和1,换句话说,我们如果有办法记录0和1就可以记录数据了,比如我们有2个灯泡,一个不亮一个亮就可以表示01,即数字1,两个都亮11,即表示数字2,越大的数可以用越多的灯泡来表示。然而,存储0的浮栅,相比存储1的浮栅,有更多的电子,会抵消控制极上的电压,所以控制极需要更大的电压才能导通两个N极。因此,当不知道浮栅中有多少电子时,就可以往控制极加一个中间值电压,如果两个N极导通,就能反推出浮栅中的电子较少,识别为1;原创 2024-02-10 10:25:50 · 2077 阅读 · 1 评论 -
011集——16进制内存地址——计算机内存地址为什么用16进制?
计算机内存之所以用十六进制,是因为16是2的4次方,二进制到十六进制之间比较容易转换,电路比较简单,焊起来容易,如果内存用十进制的话,不仅效率不会提升,还会徒增复杂度和成本。既然内存地址也是个整数,那么如果有个小盒子(变量)存放这个内存地址,那我们就可以随时通过这个小盒子里的地址找到相应的内存块,取得里面的数据或是改变里面的数据了。3、一些常用值的定义,比如:我们经常用到的html中color表达,就是用的16进制方式,4个16进制位可以表达好几百万的颜色信息。谈到内存地址,不可避免引出指针的概念。原创 2024-02-10 09:59:09 · 4554 阅读 · 1 评论 -
006集——#If...Then...#Else 指令的作用与 If...Then...Else 语句——VBA
指令没有单独成行的形式,也就是说,在指令所在的那一行,不能有其他代码出现。条件编译通常用来编译不同平台上的同一个程序。也可以用来避免调试程序代码出现在可执行程序中。条件编译时被排除的程序代码在最后的可执行文件中被完全略去,所以不会对程序的大小或功能有任何影响。例如,vba7和vba6为不同的idea环境,一个程序如要同时可在两个环境运行,则用到#if 判断平台,然后选择不同的代码进行执行,否则可能会报错。无论结果如何,都要计算所有表达式。所以,在表达式中用到的所有。条件编译指令中的表达式总是用。原创 2024-02-09 14:35:56 · 744 阅读 · 0 评论 -
005集——seek函数及get函数的应用——vba
说明:此文章为上一篇文章的延续补充,了解本文的实例应用请看上篇文章☛(004集——Put 语句将一个变量的数据写入磁盘文件中(VBA)-CSDN博客 https://blog.csdn.net/yongshiqq/article/details/136085866?原创 2024-02-09 14:27:55 · 1353 阅读 · 0 评论 -
004集——Put 语句将一个变量的数据写入磁盘文件中(VBA)
filenumber, [recnumber],varname语句的语法具有以下几个部分:部分描述filenumber必要。任何有效的文件号。recnumber可选。记录号(方式的文件)或字节数(方式的文件),指明在此处开始写入。varname必要。包含要写入磁盘的数据的变量名。关于什么是random方式,我们有必要详细说明下。在本博之前的文章中有详细介绍open函数,我们知道mode有以下几种:mode。原创 2024-02-09 14:16:43 · 1112 阅读 · 0 评论 -
010集——再次讨论【二进制文件与文本文件】的区别联系
文本文件只是二进制文件中的一种特例,为了与文本文件相区别,人们又把除了文本文件以外的文件称为二进制文件,由于很难严格区分文本文件和二进制文件的概念,所以我们可以简单地认为,如果一个文件专门用于存储文本字符的数据,没有包含字符以外的其他数据,我们就称之为文本文件,除此之外的文件就是二进制文件。所以,我们很难区分二者的不同,因为他们的概念上不是完全互斥的。\n特别的是,文本文件是指以ASCII码方式(也称文本方式)存储的文件,更确切地说,英文、数字等字符存储的是ASCII码,而汉字存储的是机内码。原创 2024-02-08 18:16:21 · 1265 阅读 · 0 评论 -
003集——通过VBA将二进制文件转为文本文件
对于二进制的文件,我们可以通过vba代码转为文本文件。原创 2024-02-07 17:54:12 · 1023 阅读 · 0 评论 -
002集——统一码(Unicode)及ASCII码详解
统一码(Unicode),它也叫万国码、单一码,是计算机科学领域里的一项业界标准,包括字符集、编码方案等。Unicode是为了解决传统的字符编码方案的局限而产生的,它为每种语言中的每个字符设定了统一并且唯一的,以满足跨语言、跨平台进行文本转换、处理的要求。如果把各种文字编码形容为各地的方言,那么就是世界各国合作开发的一种语言。在这种语言环境下,不会再有语言的编码冲突,在同屏下,可以显示任何语言的内容,这就是Unicode的最大好处。就是将世界上所有的文字用2个字节统一进行编码。原创 2024-02-07 11:47:13 · 2704 阅读 · 0 评论 -
001集:open语句打开文件及文件类型(二进制、文本文件)详解——vba
二进制文件是按二进制的编码方式来存放文件的。例如, 数10000的存储形式为:0010 0111 0001 0000只占二个字节。二进制文件虽然也可在屏幕上显示,但其内容无法读懂。具体这个是什么,是根据文本编码显示的符号,其本身还是二进制,不需要深究!无论是文本文件还是二进制文件,其本质都是二进制存储。原创 2024-02-05 16:14:36 · 2659 阅读 · 0 评论 -
Replace()函数实例讲解——vba
'vba.Replace 共有6个参数,后面有些参数是可以省略不填的。'Expression:(被搜索的字符串-在哪儿找)'Replace:替换成什么 (替换后的内容)VBA的Replace参数详细讲解及示例教程。'CompareMethod:对比或匹配方式。'Find:找什么(将被替换掉的部分)'Start:从第几个字符开始找。'Count:替换多少次。原创 2024-01-10 16:16:21 · 3981 阅读 · 0 评论 -
Rnd()随机数函数
例如,我们生成20个 1 到 100 之间的随机数值,并写如excel表中A列。Rnd()函数提供一个随机数,大于等于0,小于1,即 [ 0 ,1 )。Int ( 最小数 + Rnd * (最大数 -最小数+ 1) )原创 2024-01-08 11:35:07 · 1681 阅读 · 0 评论 -
select case 语句详解
Case Else 子句用于指明 elsestatements,当 testexpression 和所有的 Case 子句中的 expressionlist 都不匹配时,则会执行这些语句。其形式为 expression,expression To expression,Is comparisonoperator expression的一个或多个组成的分界列表。如果 testexpression 匹配一个以上的 Case 子句中的 expressionlist 表达式,则只有第一个匹配后面的语句会被执行。原创 2024-01-08 10:54:18 · 4698 阅读 · 0 评论 -
vba中字典的应用实例
vba中字典dictionary: keys和items都是数组的形式,字典的item是单个形式非数组。关于字典的前期绑定和后期绑定:(本博更倾向后期绑定,因为写好的程序换电脑运行或发给别人运行时不需要再到工具栏引用选项选字典库了,省事方便)原创 2023-12-20 22:49:34 · 1007 阅读 · 1 评论 -
type语句详解与实例及应用与len()函数
vba编程中我们会经常遇到type语句,以下为一个Type 语句示例原创 2023-12-18 22:45:17 · 1223 阅读 · 0 评论 -
split函数与join函数(字符串的分割 与连接)
Splitsplit函数可将字符串分割为若干字符并存于数组中,函数说明如下:Split。原创 2023-12-17 22:30:28 · 639 阅读 · 0 评论