第07章 VBA工具类

右侧导航 教程所有章 VBA 工具类 大纲 第1节 VBA 字符串String 第2节 VBA Len 字符数 第3节 VBA UCase 转化为大写 第4节 VBA LCase 转化为小写 第5节 VBA Left 取左边子字符串 第6节 VBA Right 取右边子字符串 第7节 VBA Mid 取中间子字符串 第8节 VBA InStr 查找位置 第9节 VBA Replace 替换子字符串 第10节 VBA Trim 去掉两边空格 第11节 VBA LTrim 去掉左边空格 第12节 VBA RTrim 去掉右边空格 第13节 VBA Split 分割为数组 第14节 VBA StrReverse 反转 第15节 VBA Asc 字符ASC码值 第16节 VBA Chr 码值的字符 第17节 VBA String 重复字符 第18节 VBA Space 重复空格 第19节 VBA Date 日期 第20节 VBA DateSerial 创建日期 第21节 VBA Date 当前日期 第22节 VBA Now 当前日期与时间 第23节 VBA Time 当前时间 第24节 VBA TimeSerial 创建时间 第25节 VBA Year等 日期部分 第26节 VBA Format 格式化 第27节 VBA DateValue 字符串转日期 第28节 VBA TimeValue 字符串转时间 第29节 VBA DateAdd 日期加减 第30节 VBA DateDiff 时间差值 第31节 VBA 类型转化 第32节 VBA MsgBox消息框 第33节 VBA InputBox 输入框 下一章 第08章 VBA Excel对象
❮上一节  VBA 字符串String 下一节  VBA UCase 转化为大写❯

VBA Len 字符数

返回字符串的字符数。


语法

Function Len(str)

返回字符串str的字符数。

中文字符算1个字符。


示例

Sub sub1()
  Dim s1, s2 As String
  s1 = "dushare.cn"
  s2 = "关关教程"
  Debug.Print Len(s1)  '输出15
  Debug.Print Len(s2)  '输出4
End Sub

❮上一节  VBA 字符串String 下一节  VBA UCase 转化为大写❯