当前位置:文档之家› VBA处理网页基础二

VBA处理网页基础二

VBA处理网页基础二
VBA处理网页基础二

VBA的WEB应用系列教程——HTML文档篇

上节课,我们说了HTTP通讯,HTTP通讯一般情况返回的是啥呢?是页面的源代码。例如,我们访问百度,返回了,“…”一大堆东西。就是,我们在页面点击右键,“查看页面源文件”,如图:

我们的浏览器,正是把这堆源代码,翻译成我们可视的生动地页面的。就像VBA一样,这堆代码是什么语言呢,就是通常所说的,超文本标记语言。

为啥叫标记语言,因为它只能用于展示,展示我们所看到的网页页面。不是编程语言哦。

为啥叫超文本呢,大家仔细看,这堆源代码有什么特征呢,就是有很多<…>这样的文本,一般而言,我们把<…>叫做标签,细心的同学可以发现,标签都是成对出现的,例如“百度一下,你就知道 ”。第一个叫做开始标签,第二个多带了个/叫结束标签。标签之间就是网页的文本,例如这个例子,就是我们网页标题的文本“百度一下,你就知道”。所以,标签的作用就是,给文本打上标记,告诉浏览器,怎么显示这个文本。例如本例,要求浏览器把“百度一下,你就知道”显示成网页的标题。HTML文档=文本+标签,所以就超文本啦。

总之,HTML就是用来描述网页的语言,像上面所说的这样的标签,是有一整套的,呵呵。</p><p>我们的教程,并不是为了教大家,怎么去做网页,设计网页,因此,大家仅仅需要,大致的了解一些HTML系列的文本标记语言的基础即可,知道常用的几个标签,有什么用即可。</p><p>一、网页数据提取常见的HTML标签/元素</p><p>上面说了,标签是用来描述网页的。浏览器读取HTML文档,识别标签,并按标签要求以网页进行显示文本。大部分标签都是成队出现的。</p><p>起始标签和结束标签之间的所有文本,都叫做元素。也就是这个格式就是:<起始标签:也叫元素名>元素的内容<结束标签:/+元素名></p><p>标签是可以拥有属性的,因此起始标签,有时候格式如下:</p><p><元素名属性名称=”属性值”></p><p>属性提供了元素的一些附加信息啦,后面我们讲具体标签,大家就会见到属性怎么用。</p><p>另外,注意,元素是可以拥有元素的,即某个元素的内容有时候是一个子元素。</p><p>元素这东西,比较抽象,我们可以把它且当作一个对象来理解,例如工作簿对象,每个工作簿的名称都不一样(属性),每个工作簿里面都有工作表(子元素),每个表都有名称(属性),里面填写的内容也不一样(元素的内容)。</p><p>下面讲讲常见的和我们网页数据提取要常见的元素/标签。</p><p>(一)整体框架结构:</p><p>每个网页文档,都是有个大致的框架,框架如下:</p><p><html></p><p><head> <!--注释:文档头部,文档相关消息,并不提供文档内容--> <title></p><p>网页标题</p><p>

网页文档主体

把上面这段文本保存在TXT文件里面,然后另存.html格式,就可以得到最基础的页面。

从上面的框架代码,我们可以看出,一般的页面,都有html元素,其一般内含两个元素,一个是head元素,一个是body元素。Head元素仅仅说明文档的相关消息,并不展示文档实体,body元素才是真正展示文档主体的,所有要在页面展示的元素,都要在body內进行书写。

后面的元素的测试,都是以替换掉body元素内的文本“网页文档主体”进行书写,后续不再复述这个框架。

(二)段落

特别是提取小说,新闻等页面的消息,文本都是一段一段的,这样的页面,一般是通过

标签实现的。这个没啥好说的,自己动手试看看就知道。

所以,当运用ie/webbrowser方式提取这类网页的时候,历遍段落p元素即可。

(三)超链接

超链接是我们最常见的页面元素,基本的门户网站都有他,点了以后,可以跳转到另一个页面。一般语法格式:

显示的超链接文本

Target属性,表示的是,当我们点击超链接,是在原页面进行跳转(_self)还是新建页面进行跳转(_blank)。

测试做个ET的超链接吧。

(四)图像

图像标签用法和超链接类似,语法:

”文本”

alt属性代表的是,当图片无法加载的时候,替换显示的文本。

我们做个加载ET的LOGO的页面玩玩。()。

(五)表格

表格是我们网页最常见的,也是我们网页数据提取,最需要打交道的,其实它非常简单,框架如下,每行用

,每个单元格用

第一行第一个单元格第一行第二个单元格
第二行第一个单元格第二行第二个单元格

(六)列表

很多时候,数据也经常以列表形式存在的,列表有三种:无序、有序和自定义。分别框架如下:

1、无序列表

    • 函数
    • VBA

    2、有序列表

      1. 图书

        1. VBA
        2. 函数

      2. 视频

        1. 基操
        2. 图表
        3. 数透

      3、自定义列表

      第一节课

      网络通讯

      第二节课

      HTML

      (七)表单和表单控件

      除了表格,表单也是我们在网页数据提取,页面操控最常见到的元素。例如我们注册用户,例如我们的微博登陆,例如我们的百度搜索,其实都是表单。我们先来看一个例子:

      请在文本框输入要搜索的关键字,后按提交,将提交百度进行搜索

      例如在文本框输入“苹果”后,按提交按钮:

      这个表单模拟的是百度搜索,在文本框输入关键字后,按提交,将跳转至百度的搜索结果的界面。呵呵,奇妙吧。如何实现的呢?

      细心的同学会发现吧,表单form这个元素,有“method”和“action”两个属性,action属性指定的就是,提交表单后,向这个属性指定URL发送http 请求(呵呵,涉及到第一节课的知识啦),method这个属性设定的就是,要按照get或者post等方式发送http请求。复习下第一节课吧,采用get的方式呢,参数将在URL后面加个?号,然后发送,采用post的方式呢,将在消息主体里面投递查询参数。

      那发送http请求的参数从哪里来的?就是从表单元素内含的各种下属元素,提取其name属性的值,作为参数名,然后提取该元素的value属性作为参数值

      (value属性的值有时候是由我们输入的,例如本例,虽然我们指定了默认的value属性的值为exceltip,但是我们可以手动输入,把它修改成“苹果”)。然后浏览器就用参数名=参数值和&进行连接(还是上节课的知识)串起来。就如本例,提交后,观察URL为:苹果,wb就是第一个input元素的属性值,苹果就是我们输入的,赋予第一个input元素的value属性的值。

      下面,我们讲讲表单主要的内含子元素吧。

      1、输入标签(

      其语法是:其类型由type属性定义,常见的有:text(文本框)、Radio(单选按钮)、Checkboxes(复选框)、submit(提交按钮)、hidden(隐藏)、reset(重置)和password(密码框)等。其中注意,其中单选框和复选框的是否选中,由checked 属性指定,如果值是”checked”则选定。不多说了,看例子吧。(文本框和提交按钮就不做了,上面都举例了。密码框同,类似的)

      表格设计

      文档处理

      幻灯片


      vip 普通会员


      注意,当表单提交的时候,发送http请求时,单选框和复选框,仅发送checked属性为”checked”的元素。一样是把标记了checked的元素的name属性值和value属性值串起来。

      2、下拉列表如果存在multiple="multiple"的属性设定,则允许菜单多选,否则单选。Size是设置可见的菜单条目数。其下级元素,option代表的是其每个菜单项目,语法为:

      一样,value属性接着的就是发往服务器的值,当提交的时候,就是将select 的name属性值与用户选择的某项option元素的value属性值连接,进行发送。Option元素的selected属性设置的是默认选中的菜单项。示例如下:

      单选选择列表

      多重选择列表,按住shift或ctrl键进行多重选择

      (八)框架 标签和


      第二个框架

      Html就大概讲这一些吧,呵呵,毕竟我们不是要做网页,大家大致了解下就是,还可以参考去学习。一般能做到,看得懂网页的框架结构即可。

      二、HTML 文档对象模型(HTML DOM)

      认识了网页文档上面的各种元素,我们怎么访问他们呢,是通过什么机制实现的呢?

      HTML文档,向程序们,提供了访问其元素的端口,这就是HTML DOM,其定义了一套标准的针对 HTML 文档的对象访问或操作的机制。现在DOM有多个版本,本文还是以最基础的DOM 1(98年颁布)这个版本。

      1、VBA访问IE网页文档的程序模板

      讲访问前,我们先简要讲讲,如何用VBA调用IE,直接给个模板吧,详细的IE对象的属性和方法等,我们后面的课会再讲:

      Sub test()

      Dim ie, dmt

      Set ie = CreateObject("InternetExplorer.Application") '创建一

      个IE对象

      With ie

      .Visible = True '显示它

      .navigate "" '加载某个页面

      Do Until .ReadyState = 4 '等待页面加载完毕

      DoEvents

      Loop

      Set dmt = .document '将IE浏览器加载的页面文档,赋予dmt变量

      ‘开始操纵页面,或者提取数据啦

      End With

      End Sub

      通过上面这个模板,我们就可以创建一个IE对象,并将其页面文档对象赋予dmt变量,这样,我们通过dmt变量,就可对页面元素,进行后续的访问以及操作。

      2、HTML DOM 对象

      和我们EXCEL的对象集合的层次结构类似(WORKBOOKS-WORKSHEETS-CELLS 等),HTML DOM为网页文档也组织了一个对象集合的分层次模型。另外,从上一节标签和元素的学习,大家也可以大致的得知,元素是可以拥有元素的,所以,这个分层的模型完全是合理的。HTML DOM的对象模型类似如下图:

      但是,VBA直接支持调用的对象有限,如下:

      VBA支持直接调用对象的元素,调用就非常方便了,可以用序号调用,例如forms(0),也可以按名称/ID调用,例如forms(“名称/ID”)。

      其他没法直接调用对象的元素,可以间接从通用all对象集合中去调用该元素或该元素对应的dom对象,或者还可以从文档树模型去调用。如下阐述。

      3、文档树

      在HTML DOM中,文档的每一部分都是节点,整个文档被定义为一个文档节点,每个标签是一个元素节点,包含在元素中的文本是文本节点,每一个元素的属性是一个属性节点。

      形象的比喻做一棵树吧,根节点就是html,主干就是body等,枝干就是body 内含的各种元素节点,叶子和花就是元素节点关联的元素的属性(属性节点)或内含文本(文本节点)。自己画的图太丑了,直接引用w3school的图吧:

      当HTML DOM在解析网页文档的时候,就按整个文档的结构生成一棵树,全部保存在内存中,我们可以随时访问任何节点。

      总之,网页文档,可以说是由元素组合而成的,也可以说是由节点连接而成的树构造的。节点是文档树结构中特有的名词,元素是节点,但是节点不一定是元素,节点还有文档节点、文本节点、属性节点等;元素是元素节点的扩展,元素可以拥有属性还有文本。初学者不是很必要纠结元素和节点的区别,这个需要甚至数据结构、类和继承等知识。可大致理解为,同一个html dom对象,提供的两个不同接口。有兴趣的朋友,可以按F8运行下面这个程序,然后本地窗口观察bd这个dody对象,你会发现,他既有支持node(节点)的相关属性和方法,也提供了element(元素)的相关属性和方法。

      Sub test()

      Dim ie, dmt, bd

      Set ie = CreateObject("InternetExplorer.Application") '创建一个IE 对象

      With ie

      .Visible = True '显示它

      .navigate "" '加载某个页面

      Do Until .ReadyState = 4 '等待页面加载完毕

      DoEvents

      Loop

      Set dmt = .document '将IE浏览器加载的页面文档,赋予dmt变量 Set bd = dmt.body '将文档的body赋予bd变量

      End With

      End Sub

      4、如何通过文档树查找所需的网页元素

      打个比方吧,当我们要掏大树上的鸟窝,有几种方式呢?

      (1)首先,当我们可以目测到,鸟窝在哪个节点的时候,我们可以用梯子,爬上去,直接掏。因此,当我们可以很清晰的观测到,节点的某些属性时,就可以直接定位它。元素节点的主要的定位属性有:id、name和索引号。还记得吗,元素起始标签的语法:<标签 id="xx" name="xx" value=”xx”...>,当初一定很疑惑吧,为啥要有名字或id等属性,现在明白了吧,和我们的姓名和学号一样,为了比较容易的找到我们。

      那索引号是什么呢,就例如我们从树根出发,清点树上的果子,给每个果子编号,这样我们就很容易知道,哪个号的果子成熟了,或者被虫子咬了。一样的,我们可以按源代码书写的顺序,给每类的元素的成员进行编号(类似每类元素,形成一个数组,从0开始编号)。通过元素类别和编号,我们可以很容易的找到它。

      另外,例如我们中学的老师,上课时,要抓人提问,可以用学号,也可以通过小组,哪一排,第几个学生,起来提问。因此,索引号,也有整个文档的,和同类元素之分。殊途同归,无论你点这个学员的学号,还是从他的组别的座位号去找他,都是可以的。所以,按统计方式或者起始节点的不同,索引号也会不同。

      刚刚说的查找工具(也就是打比方里面的梯子)有以下这些:

      getElementById(“元素的id属性”)或all(“元素的id属性”):返回拥有指定id的元素集合

      getElementsByName(“元素的name属性”)或all(“元素的name属性”):返回拥有指定名称的元素的集合

      getElementsByTagName(“标签名称”)或all.tags(“标签名称”):返回该类标签的元素集合。

      all(索引号):返回指定索引号的元素节点。

      (2)其次,当我们仅听到鸟鸣声,却不知道鸟窝在哪里的时候,有时候,我们只能顺藤摸瓜,开始爬树,沿着树干进行判断,最后攀爬到鸟窝处。或者,可能大概知道个方位,先架梯子,到某个主干,再从那里开始查找。因此,当我们找不到清晰的属性去定位网页元素时,我们可以从body元素/节点开始,一级级去寻找,也可以先定位到它的毗邻节点/元素,再通过判断,去查找它的精确位置。

      从节点方面而言,树形的模型的节点有个特征,除了根节点,每个节点均只有一个父节点(parentNode),有一个或者多个子节点(childNodes,类似一个对象集合或对象数组,从0开始编号)。因此,通过节点的亲属关系,进行判断查找,我们就可以一步步的在父子节点中切换,获取所需的元素。节点有一些属性,可以利于我们的查找判断,如下:

      nodeName(节点名称):元素节点的名称为其标签名,属性节点的名称为其属性名称;

      nodeValue(节点值):文本节点的值为其包含的文本,属性节点的值为其包含的属性值;

      nodeType(节点类型):元素节点为1、属性节点为2、文本节点为3、注释节点为8、文档节点为9

      另外,从元素方面而言,要定位元素的父元素可以通过parentElement属性,定位元素的子元素集合可以通过children属性,判断其标签的名称(tagname),他的值(value),内含文本(innertext)等方式来进行查找。

      最后,定位节点/元素的下一个同级兄弟可以通过nextSibling属性,定位上一个同级兄弟可以用previousSibling属性。

      示例的话,后面一起展示。先学懂方法吧。

      5、网页元素分析工具

      工欲善其事,必先利其器,很多高手已经提供给我们很多好用的网页元素的分析工具,我们怎么用他们呢?讲两个工具,一个是网页精灵(按键精灵论坛的作品),一个是firebug。

      首先是网页按键精灵。如附件,操作如下图,输入网址,按“网页分析”,然后按F9,将鼠标指向需要分析的页面元素,例如文本框,则得出元素相关的属性。

      下方得出的有,标签的名称,元素的id,元素的name,元素的索引号(第几个input标签,从0开始编号)。复习下上面说的概念?就想象网页文档是个班级,标签就是学习小组,其中input这个学习小组里面,有个人的名字name 是wd,他的工号id是kw,它在小组里面座位号是0。我们,就是用这些标示,来找到这个元素的。

      另外,在firefox浏览器,还可以使用firebug,直接对页面元素单击右键,使用“使用firebug查看元素”的菜单。这样可以直接观察到该元素的网页源代码,然后进行分析。

      VBA常用代码大全

      .、八、- 刖言 我们平时在工作表单元格的公式中常常使用函数,EGcel自带的常用的函数多达300多个, 功能强大,丰富多彩,但是在 VBA中不能直接应用,必须在函数名前面加上对象,比如:Applicatio n. WorksheetF un ctio n.Sum(arg1,arg2,arg3) 。 而能在VBA中直接应用的函数也有几十个,下面将逐一详细介绍常用的40个VBA函数, 以供大家学习参考。 第1.1例ASC函数 一、题目: 要求编写一段代码,运行后得到字符串”EGcel”的首字母和” e”的ASCII值。 二、代码: Sub 示例_1_01() DimmyNum1%,myNum2% myNum仁Asc("EGcel")'返回 69 myNum2=Asc("e")' 返回 101 [a1]="myNum 1=":[b1]=myNum1 [a2]="myNum2=":[b2]=myNum2 En dSub 三、代码详解 1、Sub示例_1_01():宏程序的开始语句。 2、DimmyNum1%,myNum2% :变量 myNum1 和 myNum2 声明为整型变量。 也可以写为DimmyNum1AsInteger 。Integer变量存储为16位(2个字节)的数值形式,

      其范围为-32,768到32,767之间。Integer的类型声明字符是百分比符号(%)。 3、myNum1=Asc("EGcel"):把 Asc 函数的值赋给变量 myNum1 。 Asc函数返回一个Integer,代表字符串中首字母的字符的 ASCII代码。 语法 Asc(stri ng) 必要的string (字符串)参数可以是任何有效的字符串表达式。如果string中没有包含任何字符,则会产生运行时错误。 4、myNum2=Asc("e"):把Asc函数的值赋给变量myNum2。这里返回小写字母e的ASCII 代码101。 5、 [a1]="myNum仁":[b1]=myNum1 :把字符串“ myNum仁“赋给A1单元格,把变量myNum1的值赋给B1单元格。 6、 [a2]="myNum2=":[b2]=myNum2 :把字符串“ myNum2= “赋给 A2 单元格,把变量myNum2的值赋给B2单元格。 7、 EndSub :程序的结束语句,和“ Sub示例_1_01 ()”相对应。 第1.2例Chr函数 一、题目"": 要求编写一段代码,运用 Chr函数将ASCII值转换为对应的字符 二、代码: Sub 示例_1_02() DimmyChar1$,myChar2$ myChar仁Chr(69)'返回 E。 myChar2=Chr(101)' 返回 e。 [a1]="myChar1=":[b1]=myChar1 [a2]="myChar2=":[b2]=myChar2

      VBA函数大全

      Abs函数 返回参数的绝对值,其类型和参数相同。 Array函数 返回一个包含数组的Variant。 Asc函数 返回一个Integer,代表字符串中首字母的字符代码。Atn函数 返回一个Double,指定一个数的反正切值。CallByName函数 执行一个对象的方法,或者设置或返回一个对象的属性。Choose函数 从参数列表中选择并返回一个值。 Chr函数

      返回String,其中包含有与指定的字符代码相关的字符。Cos函数 返回一个Double,指定一个角的余弦值。CreateObject函数 创建并返回一个对ActiveX对象的引用。CurDir函数 返回一个Variant(String),用来代表当前的路径。CVErr函数 返回Error子类型的Variant,其中包含指定的错误号。Date函数 返回包含系统日期的Variant(Date)。

      DateAdd函数 返回包含一个日期的Variant(Date),这一日期还加上了一段时间间隔。DateDiff函数 返回Variant(Long)的值,表示两个指定日期间的时间间隔数目。DatePart函数 返回一个包含已知日期的指定时间部分的Variant(Integer)。DateSerial函数 返回包含指定的年、月、日的Variant(Date)。DateValue函数

      返回一个Variant(Date)。 Day函数 返回一个Variant(Integer),其值为1到31之间的整数,表示一个月中的某一日。 DDB函数 返回一个Double,指定一笔资产在一特定期间内的折旧。可使用双下落收复平衡方法或其它指定的方法进行计算。 Dir函数 返回一个String,用以表示一个文件名、目录名或文件夹名称,它必须与指定的模式或文件属性、或磁盘卷标相匹配。 DoEvents函数

      VBA函数大全自己的

      V B A函数大全自己的公司标准化编码 [QQX96QT-XQQB89Q8-NQQJ6Q8-MQM9N]

      Abs函数 返回参数的绝对值,其类型和参数相同。 Array函数 返回一个包含的。 Asc函数 返回一个,代表字符串中首字母的。 Atn函数 返回一个,指定一个数的反正切值。CallByName函数 执行一个对象的方法,或者设置或返回一个的属性。Choose函数 从列表中选择并返回一个值。 Chr函数 返回,其中包含有与指定的相关的字符。 Cos函数 返回一个Double,指定一个角的余弦值。CreateObject函数 创建并返回一个对的引用。

      CurDir函数 返回一个Variant(String),用来代表当前的路径。 CVErr函数 返回Error子类型的,其中包含指定的。 Date函数 返回包含系统日期的Variant(Date)。 DateAdd函数 返回包含一个日期的Variant(Date),这一日期还加上了一段时间间隔。DateDiff函数 返回Variant(Long)的值,表示两个指定日期间的时间间隔数目。DatePart函数 返回一个包含已知日期的指定时间部分的Variant(Integer)。DateSerial函数

      返回包含指定的年、月、日的Variant(Date)。 DateValue函数 返回一个Variant(Date)。 Day函数 返回一个Variant(Integer),其值为1到31之间的整数,表示一个月中的某一日。 DDB函数 返回一个,指定一笔资产在一特定期间内的折旧。可使用双下落收复平衡方法或其它指定的方法进行计算。 Dir函数 返回一个String,用以表示一个文件名、目录名或文件夹名称,它必须与指定的模式或文件属性、或磁盘卷标相匹配。 DoEvents函数 转让控制权,以便让操作系统处理其它的事件。 Environ函数 返回String,它关连于一个操作系统环境变量。在Macintosh中不可用

      vba常用代码大全

      前言 我们平时在工作表单元格的公式中常常使用函数,Excel自带的常用的函数多达300多个,功能强大,丰富多彩,但是在VBA中不能直接应用,必须在函数名前面加上对象,比如:Application.WorksheetFunction.Sum(arg1,arg2,arg3)。 而能在VBA中直接应用的函数也有几十个,下面将逐一详细介绍常用的40个VBA函数,以供大家学习参考。 第1.1例 ASC函数 一、题目: 要求编写一段代码,运行后得到字符串”Excel”的首字母和”e”的ASCII值。 二、代码: Sub 示例_1_01() Dim myNum1%, myNum2% myNum1 = Asc("Excel") '返回69 myNum2 = Asc("e") '返回101 [a1] = "myNum1= ": [b1] = myNum1 [a2] = "myNum2= ": [b2] = myNum2 End Sub 三、代码详解 1、Sub 示例_1_01():宏程序的开始语句。 2、Dim myNum1%, myNum2%:变量myNum1和myNum2声明为整型变量。

      也可以写为 Dim myNum1 As Integer 。Integer 变量存储为 16位(2 个字节)的数值形式,其范围为 -32,768 到 32,767 之间。Integer 的类型声明字符是百分比符 号 (%)。 3、myNum1 = Asc("Excel"):把Asc函数的值赋给变量myNum1。 Asc函数返回一个 Integer,代表字符串中首字母的字符的ASCII代码。 语法 Asc(string) 必要的 string(字符串)参数可以是任何有效的字符串表达式。如果 string 中没有包含任何字符,则会产生运行时错误。 4、myNum2 = Asc("e"):把Asc函数的值赋给变量myNum2。这里返回小写字母e 的ASCII代码101。 5、[a1] = "myNum1= ": [b1] = myNum1:把字符串“myNum1= “赋给A1单元格,把变量myNum1的值赋给B1单元格。 6、[a2] = "myNum2= ": [b2] = myNum2:把字符串“myNum2= “赋给A2单元格,把变量myNum2的值赋给B2单元格。 7、End Sub:程序的结束语句,和“Sub示例_1_01()”相对应。 第1.2例 Chr函数 一、题目"": 要求编写一段代码,运用Chr函数将ASCII值转换为对应的字符。 二、代码: Sub 示例_1_02()

      vba字符串函数列表

      vba字符串函数列表.txt其实全世界最幸福的童话,不过是一起度过柴米油盐的岁月。一个人愿意等待,另一个人才愿意出现。感情有时候只是一个人的事,和任何人无关。爱,或者不爱,只能自行了断。1,vba字符串函数列表: Trim(string) 去掉string左右两端空白 Ltrim(string) 去掉string左端空白 Rtrim(string) 去掉string右端空白 Len(string) 计算string长度 Left(string, x) 取string左段x个字符组成的字符串 Right(string, x) 取string右段x个字符组成的字符串 Mid(string, start,x) 取string从start位开始的x个字符组成的字符串 Ucase(string) 转换为大写 Lcase(string) 转换为小写 Space(x) 返回x个空白的字符串 Asc(string) 返回一个integer,代表字符串中首字母的字符代码 Chr(charcode) 返回string,其中包含有与指定的字符代码相关的字符 2,VBA转换函数列表: CBool(expression) 转换为Boolean型 CByte(expression) 转换为Byte型 CCur(expression) 转换为Currency型 CDate(expression) 转换为Date型 CDbl(expression) 转换为Double型 CDec(expression) 转换为Decemal型 CInt(expression) 转换为Integer型

      CLng(expression) 转换为Long型 CSng(expression) 转换为Single型 CStr(expression) 转换为String型 CVar(expression) 转换为Variant型 Val(string) 转换为数据型 Str(number) 转换为String 3,VBA时间函数: Now 返回一个Variant (Date),根据计算机系统设置的日期和时间来指定日期和时间。 Date 返回包含系统日期的Variant (Date)。 Time 返回一个指明当前系统时间的Variant (Date)。 Timer 返回一个Single,代表从午夜开始到现在经过的秒数。 TimeSerial(hour, minute, second)返回一个Variant (Date),包含具有具体时、分、秒的时间。 DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])返回Variant (Long)的值,表示两个指定日期间的时间间隔数目 Second(time)返回一个Variant (Integer),其值为0到59之间的整数,表示一分钟之中的某个秒 Minute(time)返回一个Variant (Integer),其值为0到59之间的整数,表示一小时中的某分钟 Hour(time)返回一个Variant (Integer),其值为0到23之间的整数,表示一天之中的某一钟点 Day(date)返回一个Variant (Integer),其值为1到31之间的整数,表示一个月中的某一日 Month(date)返回一个Variant (Integer),其值为1到12之间的整数,表示一年中的某月

      VBA,字符串处理大全

      1 VBA中的字符串 2 VBA中处理字符串的函数 2.1 比较字符串 2.2 转换字符串 2.3 创建字符串 2.4 获取字符串的长度 2.5 格式化字符串 2.6 查找字符串 2.7 提取字符/字符串 2.8 删除空格 2.9 返回字符代码 2.10 返回数值代表的相应字符 2.11 使用字节的函数 2.12 返回数组的函数 2.13 连接字符串 2.14 替换字符串 2.15 反向字符串 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 VBA中的字符串 VBA不仅可以处理数字,也可以处理文本(字符串)。VBA提供了两类字符串: 一类为固定长度的字符串,声明时包含指字的字符数。例如,下面的语句 Dim strFixedLong As String*100 声明字符串变量后,无论赋予该变量多少个字符,总是只包含100个字符,但字符串最长不超过65526个字符,且需要使用Trim函数去掉字符串中多余的空格。定长字符串只有在必要时才使用。 另一类为动态字符串。例如,声明字符串变量Dim strDynamic As String后,可以给该变量任意赋值,最多可包含20亿个字符。 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 2 VBA中处理字符串的函数 2.1 比较字符串 通常,在VBA中进行字符串比较时,会用到比较运算符(如=、>等)、Like运算符和StrComp 函数。此外,在模块的开头用Option Compare语句指定比较方式。 2.1.1 比较运算符 可以采用简单的逻辑运算符进行两个字符串的比较,即<(小于)、<=(小于或等于)、>(大于)、>=(大于或等于)、=(等于)、<>(不等于)。此外,还可以使用Like运算符进行比较。2.1.2 StrComp函数 StrComp函数返回字符串比较的结果。其语法为: StrComp(string1,string2[,compare]) 其中,参数string1和strng2为必需的参数,可以是任何有效的字符串表达式。 参数Compare为可选参数,如果该参数为Null,将发生错误。如果参数Compare设置为常数vbUseCompareOption或-1或忽略该参数,将使用Option Compare语句设置进行比较;如果忽略该参数且没有设置Option Compare语句,则按二进制进行比较;如果参数Compare 设置为常数vbBinaryCompare或0,则用二进制进行比较;如果参数Compare设置为常数vbTextCompare或1,则按文本进行比较;如果参数Compare设置为常数vbDatabaseCompare

      在VBA中处理字符串(基本操作篇1)

      在VBA中处理字符串(基本操作篇1) - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 2 VBA中处理字符串的函数 2.1 比较字符串 通常,在VBA中进行字符串比较时,会用到比较运算符(如=、>等)、Like运算符和StrComp函数。此外,在模块的开头用Option Compare语句指定比较方式。 2.1.1 比较运算符 可以采用简单的逻辑运算符进行两个字符串的比较,即 <(小于)、<=(小于或等于)、>(大于)、>=(大于或等于)、=(等于)、<>(不等于)。此外,还可以使用Like运算符进行比较。

      2.1.2 StrComp函数 StrComp函数返回字符串比较的结果。其语法为:StrComp(string1,string2[,compare]) 其中,参数string1和strng2为必需的参数,可以是任何有效的字符串表达式。 参数Compare为可选参数,如果该参数为Null,将发生错误。如果参数Compare设置为常数vbUseCompareOption或-1或忽略该参数,将使用Option Compare语句设置进行比较;如果忽略该参数且没有设置Option Compare语句,则按二进制进行比较;如果参数Compare设置为常数vbBinaryCompare或0,则用二进制进行比较;如果参数Compare设置为常数vbTextCompare或1,则按文本进行比较;如果参数Compare设置为常数vbDatabaseCompare 或2,此时仅适用于Microsoft Access,进行基于数据库信息的比较。

      vba字符串函数列表

      1,vba字符串函数列表: Trim(string) 去掉string左右两端空白 Ltrim(string) 去掉string左端空白 Rtrim(string) 去掉string右端空白 Len(string) 计算string长度 Left(string, x) 取string左段x个字符组成的字符串 Right(string, x) 取string右段x个字符组成的字符串 Mid(string, start,x) 取string从start位开始的x个字符组成的字符串Ucase(string) 转换为大写 Lcase(string) 转换为小写 Space(x) 返回x个空白的字符串 Asc(string) 返回一个integer,代表字符串中首字母的字符代码Chr(charcode) 返回string,其中包含有与指定的字符代码相关的字符2,VBA转换函数列表: CBool(expression) 转换为Boolean型 CByte(expression) 转换为Byte型 CCur(expression) 转换为Currency型 CDate(expression) 转换为Date型 CDbl(expression) 转换为Double型 CDec(expression) 转换为Decemal型 CInt(expression) 转换为Integer型 CLng(expression) 转换为Long型

      CSng(expression) 转换为Single型 CStr(expression) 转换为String型 CVar(expression) 转换为Variant型 Val(string) 转换为数据型 Str(number) 转换为String 3,VBA时间函数: Now 返回一个Variant (Date),根据计算机系统设置的日期和时间来指定日期和时间。 Date 返回包含系统日期的Variant (Date)。 Time 返回一个指明当前系统时间的Variant (Date)。 Timer 返回一个Single,代表从午夜开始到现在经过的秒数。 TimeSerial(hour, minute, second)返回一个Variant (Date),包含具有具体时、分、秒的时间。 DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])返回Variant (Long)的值,表示两个指定日期间的时间间隔数目 Second(time)返回一个Variant (Integer),其值为0到59之间的整数,表示一分钟之中的某个秒 Minute(time)返回一个Variant (Integer),其值为0到59之间的整数,表示一小时中的某分钟 Hour(time)返回一个Variant (Integer),其值为0到23之间的整数,表示一天之中的某一钟点 Day(date)返回一个Variant (Integer),其值为1到31之间的整数,表示一个月中的某一日 Month(date)返回一个Variant (Integer),其值为1到12之间的整数,表示一年中的某月 Year(date)返回Variant (Integer),包含表示年份的整数。

      VBA 函数大全

      Abs 函数 返回参数的绝对值,其类型和参数相同。 语法 Abs(number) 必要的number参数是任何有效的数值表达式,如果number 包含 Null,则返回Null,如果number 是未初始化的变量,则返回 0。 说明 一个数的绝对值是将正负号去掉以后的值。例如,ABS(-1)和ABS(1)都返回1。 Array 函数 返回一个包含数组的 Variant。 语法 Array(arglist) 所需的arglist参数是一个用逗号隔开的值表,这些值用于给Variant所包含的数组的各元素赋值。如果不提供参数,则创建一个长度为 0 的数组。 说明 用来表示数组元素的符号由变量名、圆括号以及括号中的所需元素的索引号组成。在下面的示例中,第一条语句创建一个Variant 的变量A。第二条语句将一个数组赋给变量A。最后一条语句将该数组的第二个元素的值赋给另一个变量。 Dim A As Variant A = Array(10,20,30) B = A(2) 使用Array函数创建的数组的下界受Option Base语句指定的下界的决定, 除非Array是由类型库(例如VBA.Array )名称限定。如果是由类型库名称限定,则Array不受Option Base的影响。 注意没有作为数组声明的Variant 也可以表示数组。除了长度固定的字符串以及用户定义类型之外,Variant 变量可以表示任何类型的数组。尽管一个包含数

      组的Variant 和一个元素为Variant 类型的数组在概念上有所不同,但对数组元素的访问方式是相同的。 Asc 函数 返回一个 Integer,代表字符串中首字母的字符代码。 语法 Asc(string) 必要的string 参数可以是任何有效的字符串表达式。如果string中没有包含任何字符,则会产生运行时错误。 说明 在非 DBCS 系统下,返回值范围为 0 –255 。在 DBCS 系统下,则为 -32768 –32767。 注意AscB函数作用于包含在字符串中的字节数据,AscB 返回第一个字节的字符代码,而非字符的字符代码。AscW函数返回 Unicode 字符代码,若平台不支持 Unicode,则与Asc函数功能相同。 Atn 函数 返回一个 Double,指定一个数的反正切值。 语法 Atn(number) 必要的number参数是一个 Double或任何有效的数值表达式。 说明 Atn函数的参数值 (number) 为直角三角形两边的比值并返回以弧度为单位的角。这个比值是角的对边长度除以角的邻边长度之商。 值的范围在-pi/2 和 pi/2 弧度之间。 为了将角度转换为弧度,请将角度乘以 pi/180。为了将弧度转换为角度,请将弧度乘以 180/pi。

      VBA格式化字符串 VBA函数Format及工作表函数Text

      VBA 格式化字符串vba函数Format 及工作表函数Text VBA 的Format 函数与工作表函数TEXT 用法基本相同,但功能更加强大,许多格式只能用于VBA 的Format 函数,而不能用于工作表函数TEXT ,以下是本人归纳的几点用法,希望对学习VBA有所裨益。 Format(值,格式(可选参数)) 一、数字格式: 1、General Number:普通数字,可以用来去掉千位分隔号和无效0 。 如:Format("1,234,567.80", "General Number")="1234567.8" 2、Currency:货币类型,可添加千位分隔号和货币符号,保留两位小数点。 如:Format(1234567, "Currency")="¥1,234,567.00" 3、Fixed:格式为带两位小数的数字。 如:Format("123456", "Fixed")=123456.00 4、Standard:标准,即带千位分隔号和两位小数。 如:Format("123456", "Standard")=123,456.00 5、Percent:带两位小数点的百分数。 如:Format("123456", "Percent")=12345600.00 6、Scientific:科学记数法。 如:Format("1234567", "Scientific")=1.23E+06 7、Yes/No:当数值为非0 数字时返回Yes ,否则返回No 。 "如:Format(-3.14, "Yes/No")="Yes" Format(0, "Yes/No")="No" 8、True/False:当数值为非0 数字时返回True ,否则返回False 。 与第7点类似,这里不再举例。 9、On/Off:当数值为非0 数字时返回On ,否则返回Off 。 与第7点类似,这里不再举例。 10、""或省略:返回原值,但去除了小数点前后的无效0 。 如:Format("0.1030", "")=".103" 11、0:占位格式化,不足位时补足0 。 "如:Format(123, "0000")="0123" Format$(12.3, "0.00")="12.30" 12、#:占位格式化,不足位时不补足0 。 如:Format(123, "####")=123 13、%:转化为百分数,一个%代表乘以100 。 如:Format(1.23, "0.00%")=123.00% Format(1.23, "0.00%%")=12300.00%% 14、\:强制显示某字符。 如:Format$(12.34, "\R\M\B .00")="RMB 12.34" 15、;(分号):分段显示不同格式 比如要把正数显示为“正”,负数显示为“负”,0显示为“零”,参数为"正;负;零" 如:Format$(123, "正;负;零")="正" 第1段为正数格式,第2段为负数格式,第3段为0格式。 二、日期和时间格式:

      VBA字符串处理

      VBA字符串处理专题 查找特定字符串的代码 这是我在QQ群(蓝色幻想读者群)里面回复——小桥.流水(290931055) 的求助: Sub rrr() Dim pos%, w$ w = "BSQ1-3-(5,6)" pos = Application.WorksheetFunction.Find("SQ", w) MsgBox pos End Sub 还可以 Sub rrr() Dim pos%, w$ w = Sheet1.Cells(1, 1).Value 'A1的内容为:BSQ1-3-(5,6)" pos = Application.WorksheetFunction.Find("SQ", w) MsgBox pos End Sub *************************补充一下********************************** ***************************** instr函数:指定一字符串在另一字符串中最先出现的位置 InStr(开始位置,查找的字符串, 搜索的子字符串) 例:InStr(1, w,"SQ") 统计一个字符串中的某个字符的出现次数,比如"asdsd" s出现两次,应该用哪个函数? Sub ttt() Dim Q$, I%, J%, W% Q = "asdsd" I = Len(Q) For J = 1 To I If Mid(Q, J, 1) = "s" Then W = W + 1 Next MsgBox W End Sub

      *************************补充一下************************************ *************************** 以上循环也可以用以下语句实现: Sub ttt() Msgbox Len("dSdSd") - Len(Replace("dSdSd", "S", "")) End Sub 注: Replace是在一个字符串中,对指定的字符串进行替换为其他指定的字符串.本例中在字符串"dSdSd"中,用""替换"S",然后用原来的总长度(LEN函数求得)减去替换后的总长度,即为S的个数. 某个字符的出现次数(自定义函数法) Function test(X, S As String) As Integer Dim I%, J% I = Len(X) For J = 1 To I If Mid(X, J, 1) = "s" Then test = test + 1 Next End Function 用这个自定义函数也可以 比如A1的内容是:asdsd 你在a2输入: =test(a1,"s") 或者想计算 d 有几个 =test(a1,"d") 自定义函数比宏(过程sub ***() …… end sub)灵活一点 ***************************************************************** 根据蓝色幻想版主的提示,还可以自定义函数改修为: Function test(X, S As String) As Integer test = Len(X)-len(replace(x,s,"")) End Function 返回定长字符串的工作表函数法和VBA法

      Excel VBA字符串转换函数

      Excel VBA字符串转换函数 1.vba字符串函数列表: Trim(string) 去掉string左右两端空白 Ltrim(string) 去掉string左端空白 Rtrim(string) 去掉string右端空白 Len(string) 计算string长度 Left(string, x) 取string左段x个字符组成的字符串 Right(string, x) 取string右段x个字符组成的字符串 Mid(string, start,x) 取string从start位开始的x个字符组成的字符串Ucase(string) 转换为大写 Lcase(string) 转换为小写 Space(x) 返回x个空白的字符串 Asc(string) 返回一个integer,代表字符串中首字母的字符代码 Chr(charcode) 返回string,其中包含有与指定的字符代码相关的字符 2,VBA转换函数列表: CBool(expression) 转换为Boolean型 CByte(expression) 转换为Byte型 CCur(expression) 转换为Currency型 CDate(expression) 转换为Date型 CDbl(expression) 转换为Double型 CDec(expression) 转换为Decemal型 CInt(expression) 转换为Integer型

      CLng(expression) 转换为Long型 CSng(expression) 转换为Single型 CStr(expression) 转换为String型 CV ar(expression) 转换为V ariant型 V al(string) 转换为数据型 Str(number) 转换为String 3,VBA时间函数: Now 返回一个V ariant (Date),根据计算机系统设置的日期和时间来指定日期和时间。Date 返回包含系统日期的V ariant (Date)。 Time 返回一个指明当前系统时间的V ariant (Date)。 Timer 返回一个Single,代表从午夜开始到现在经过的秒数。 TimeSerial(hour, minute, second)返回一个V ariant (Date),包含具有具体时、分、秒的时间。 DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])返回V ariant (Long)的值,表示两个指定日期间的时间间隔数目 Second(time)返回一个V ariant (Integer),其值为0到59之间的整数,表示一分钟之中的某个秒 Minute(time)返回一个V ariant (Integer),其值为0到59之间的整数,表示一小时中的某分钟Hour(time)返回一个V ariant (Integer),其值为0到23之间的整数,表示一天之中的某一钟点Day(date)返回一个V ariant (Integer),其值为1到31之间的整数,表示一个月中的某一日Month(date)返回一个V ariant (Integer),其值为1到12之间的整数,表示一年中的某月 Y ear(date)返回V ariant (Integer),包含表示年份的整数。 Weekday(date, [firstdayofweek])返回一个V ariant (Integer),包含一个整数,代表某个日期是星期几

      VBA字符串用法(自整理)

      VBA 字符串用法 一、字符串比较: 1.解读Like运算符 Like运算符是字符串比较时经常使用的运算符,也是VBA较难掌握的运算符。 语法: result = string Like pattern Like运算符的语法具有以下几个部分: 如果字符串(string) 与模式(pattern) 匹配,结果为True,否则为False。但是如果Like两端的字符串和模式有一个为Null,则结果为Null。 VBA内建的模式匹配功能提供了丰富的字符串比较方式,在模式(pattern) 表达式中可以使用通配符、字符列表(或字符区间)的任何组合来匹配字符串。 1). Like在字符串比较时受Option Compare语句的影响,在默认情况下(Option Compare Binary),字符比较根据内部二进制表示法(ASCII码)进行,是区分大小写的,此时"A" Like "a" 的结果为False。如果声明了Option Compare Text,则不区分大小写比较,"A" Like "a" 的结果为True。 后面的讨论假设默认情况下。 2). 如果模式中没有使用通配符(?、*、#)和字符列表,此时Like运算符等价于=(等号)运算符。下面表达式的结果相同。 s Like "AB" s = "AB" 3). 字符列表 理解字符列表的用法是学会Like的难点

      (1) 一个字符列表匹配的是字符串中的一个字符,不管字符列表中实际有多少个字符。"A" Like [ABCDEGHIJ2345] 结果为True "AB" Like [ABCDEGHIJ2345] 结果为False 唯一的例外是[]被看作长度为零的字符串。 问: “一个字符列表匹配的是字符串中的一个字符,不管字符列表中实际有多少个字符。” "A" Like [ABCDEGHIJ2345] 结果为True "AB" Like [ABCDEGHIJ2345] 结果为False 这个不理解。 为什么"A" Like [ABCDEGHIJ2345] 结果为True 而多一个B 就为“False” 答: 和模式[ABCDEGHIJ2345] 匹配的字符串需符合两个条件: 1.它是有1个字符组成的字符串.因为这个模式只有一个字符列表. 2.这个字符是ABCDEGHIJ2345中的一个. "A"符合这两个条件.所以为TRUE "AB"不符合第1个条件.结果为FALSE 问: "AB" 不也是包含在ABCDEGHIJ2345 的吗?难道有两个字符以上就不能比较是否包含在另一个字符串(字符列表)里面?谢谢! 答: 如果要判断字符串是否由两个上面的字符组成: 模式为[ABCDEGHIJ2345][ABCDEGHIJ2345] 这时上面的"A"不匹配,"AB"匹配 (2) 字符列表中的单个字符,没有顺序要求,上面[ABCDEGHIJ2345]和[ACDEGHIJ2345B]、[3ABCDEGHIJ245]...等等是一样的表达。 (3) 字符列表中一段连续的字符(称为区间,一个字符列表可以有多个区间,广义上,单个字符也可被看作一个区间),可以使用连字符(-,减号)简化表达式,如上面的表达式[ABCDEGHIJ2345]可以简化为[A-EG-J2-5],连字符要遵循从小到大的顺序(升序),即连字符(-)右端的字符应大于左端的字符,如其中的A-E不能写成E-A,后者系统会报错。但多个区间之间没有顺序要求,这意味着[G-J2-5A-E]、[2-5G-JA-E]...等是同一表达。但下面的表达是错误的,同时也是常见的: [A-E G-J 2-5]、[A-E,G-J,2-5]、[A-E;G-J;2-5] 也许只是一种习惯或想当然,第一个除了要求表达的ABCDEGHIJ2345外,还多加了一个空格;后面两个分别多了逗号(,)和分号(;)。 "," Like [A-EG-J2-5] 结果为False "," Like [A-E,G-J,2-5] 结果为True (4) 被中括号([])括起的字符列表中的字符,?、*、#不被理解为通配符,而是表示符号自身。如果要表示-(减号,连字符),可以放在列表的开头或结尾。如[ABC-]、[-ABC]。"3" Like "?" 结果为True "3" Like "[?]" 结果为False "?" Like "[?]" 结果为True

      Excel VBA字符串转换函数

      Excel VBA字符串转换函数1.vba字符串函数列表: Trim(string)去掉string左右两端空白 Ltrim(string)去掉string左端空白 Rtrim(string)去掉string右端空白 Len(string)计算string长度 Left(string,x)取string左段x个字符组成的字符串 Right(string,x)取string右段x个字符组成的字符串 Mid(string,start,x)取string从start位开始的x个字符组成的字符串Ucase(string)转换为大写 Lcase(string)转换为小写 Space(x)返回x个空白的字符串 Asc(string)返回一个integer,代表字符串中首字母的字符代码Chr(charcode)返回string,其中包含有与指定的字符代码相关的字符 2,VBA转换函数列表: CBool(expression)转换为Boolean型 CByte(expression)转换为Byte型 CCur(expression)转换为Currency型 CDate(expression)转换为Date型 CDbl(expression)转换为Double型 CDec(expression)转换为Decemal型 CInt(expression)转换为Integer型

      CLng(expression)转换为Long型 CSng(expression)转换为Single型 CStr(expression)转换为String型 CVar(expression)转换为Variant型 Val(string)转换为数据型 Str(number)转换为String 3,VBA时间函数: Now返回一个Variant(Date),根据计算机系统设置的日期和时间来指定日期和时间。Date返回包含系统日期的Variant(Date)。 Time返回一个指明当前系统时间的Variant(Date)。 Timer返回一个Single,代表从午夜开始到现在经过的秒数。 TimeSerial(hour,minute,second)返回一个Variant(Date),包含具有具体时、分、秒的时间。DateDiff(interval,date1,date2[,firstdayofweek[,firstweekofyear]])返回Variant(Long)的值,表示两个指定日期间的时间间隔数目 Second(time)返回一个Variant(Integer),其值为0到59之间的整数,表示一分钟之中的某个秒 Minute(time)返回一个Variant(Integer),其值为0到59之间的整数,表示一小时中的某分钟Hour(time)返回一个Variant(Integer),其值为0到23之间的整数,表示一天之中的某一钟点Day(date)返回一个Variant(Integer),其值为1到31之间的整数,表示一个月中的某一日Month(date)返回一个Variant(Integer),其值为1到12之间的整数,表示一年中的某月Year(date)返回Variant(Integer),包含表示年份的整数。 Weekday(date,[firstdayofweek])返回一个Variant(Integer),包含一个整数,代表某个日期是星期几

      VBA中处理字符串常用函数

      在VBA中处理字符串 1 VBA中的字符串 VBA不仅可以处理数字,也可以处理文本(字符串)。VBA提供了两类字符串: 一类为固定长度的字符串,声明时包含指字的字符数。 例如,下面的语句 Dim strFixedLong As String*100 声明字符串变量后,无论赋予该变量多少个字符,总是只包含100个字符,但字符串最长不超过65526个字符,且需要使用Trim函数去掉字符串中多余的空格。定长字符串只有在必要时才使用。 另一类为动态字符串。 例如,声明字符串变量Dim strDynamic As String后,可以给该变量任意赋值,最多可包含20亿个字符。 2 VBA中处理字符串的函数 2.1 比较字符串 通常,在VBA中进行字符串比较时,会用到比较运算符(如=、>等)、Like运算符和StrComp 函数。此外,在模块的开头用Option Compare语句指定比较方式。 2.1.1 比较运算符 可以采用简单的逻辑运算符进行两个字符串的比较,即<(小于)、<=(小于或等于)、>(大于)、>=(大于或等于)、=(等于)、<>(不等于)。此外,还可以使用Like运算符进行比较。 2.1.2 StrComp函数 StrComp函数返回字符串比较的结果。其语法为: StrComp(string1,string2[,compare]) 其中,参数string1和strng2为必需的参数,可以是任何有效的字符串表达式。 参数Compare为可选参数,如果该参数为Null,将发生错误。 如果参数Compare设置为常数vbUseCompareOption或-1或忽略该参数,将使用Option

      文本预览